Kaip perl perl Works

Arba:

 $ a = " "; Sveiki $ b = " Pasaulio \\ n ";; $ c = $ a. $ b; # Pastaba naudojimas. į CONCAT įsipareigojimų print $ c 
 Nuo. yra simbolių eilučių sujungimas, = turi laukiamą reikšmę tuo pačiu būdu, kad ". + = " ar C Todėl galima sakyti: Rīga, 
 $ a = " "; Sveiki $ b = " Pasaulio \\ n ";; $ a = $ b. "; Spausdinti $ a 
 Taip pat galite sukurti masyvų: 
 
a = ("katė", "šuo", "ungurys"); Spausdintia, " \\ n "; print $ # A " \\ n "; # Aukščiausios indekso vertė, lygi nuliui remiantis print $ A [0], " \\ n "; Spausdinti $ a [0], $ a [1], $ a [2], " \\ n "; 
 $ # žymėjimas gauna aukščiausią indeksą masyve, atitinkanti elementų skaičių masyvo minus 1. Kaip C, visi masyvai pradėti indeksavimą nuo nulio 
 
 Taip pat galite sukurti masyvų. 
 
% H = ("šuo", "žievė", "katė", "Miau" "ungurys", "Zap"); Spausdinti " Šuo sako ", $ h {"šuo"} 
 Čia "žievė" asocijuojasi su žodžiu "šuo", "Miau" su "katė", ir taip toliau. Daugiau išraiškingas sintaksė toje pačioje deklaracijoje yra: 
 
% H = (šuo = > "žievė", katė = > "miau", ungurys = > "Zap"); 
 = > operatorius cituoja kairįjį eilutę ir veikia kaip kableliu 
 kilpų ir IFS 
 
 Galite sukurti kilpą paprasta, kaip jūs padaryti C:. 
 
 už ($ i = 0; $ I < 10; $ i ++) {print $ i " \\ n "; } 
 Nors teiginiai yra paprasta: 
 
 $ i = 0; o ($ i < 10) {print $ i " \\ n "; $ i ++; } 
 Jei teiginiai yra panašiai paprasta: 
 
 už ($ i = 0; $ i < 10; $ i ++) {if (! $ i = 5) {print $ i " \\ n "; }} 
 loginius operatorius dirbti kaip jie C: 
 
 & & ir 
 
 || arba 
 
! ne 
 
 
 numeriais: 
 
 == lygus 
 
 = ne lygus 
 
 <, < =, > , > = (kaip expected)

Others:

eq
ne
lt
le
gt
ge

If turite masyvą, galite kilpa per ją lengvai su foreach: 
 
a = ("šuo", "katė", "ungurys"); foreach $ b dalis (a) {print $ b, " \\ n ";} 
 foreach trunka kiekvieną masyvoa ir vietų jį $ B elementą, kola yra išnaudota 
 PERL Pastaba 
 Jūs turite naudoti ". pradeda " ir " galo ".. petnešos - {ir} - net ir vienoje eilutėje 
 Funkcijos 
 
 Jūs sukuriate paprogram
Page     [1] [2] [3] [4]