Vzhledem k tomu. je řetězec zřetězení, = má očekávaný význam v stejným způsobem, že ". + = " se v C. Proto, můžete říci:
$ a = " Hello &Quot;; $ b = " World \\ n "; $ a = $ b.; print $ a;Můžete si také vytvořit pole:
a = ("kočka", "pes", "úhoř"); printa, " \\ N ';; print $ # a, " \\ N ';; # Hodnota nejvyšším indexem, nuly print $ a [0], " \\ N ';; print $ a [0], $ a [1], $ a [2], " \\ n ";$ # notace dostane nejvyšší index v poli, což odpovídá počtu prvků pole mínus 1. Stejně jako v C, všechna pole začít indexování na nule
Můžete si také vytvořit hodnoty hash:.
% h = ("pes", "kůru", "kočka", "mňau" , 'úhoř', 'zap'); tisk " Pes říká ", $ h {'pes'};Zde, "kůra" je spojován se slovem "psa", "mňau" s "kočkou", a tak dále. Více expresivní syntaxe pro stejný prohlášení je:
% h = (dog = > "kůra", cat = > "mňau", úhoř = > "ZAP");= > Operátor cituje levé řetězec a působí jako čárkou
Loops a Ifs
Můžete vytvořit jednoduchý pro smyčce, jako vy v C:.
for ($ i = 0; $ i < 10, $ i ++) {print $ i, " \\ N ';; }I když příkazy jsou jednoduché:
$ i = 0; while ($ i < 10) {print $ i, " \\ N ';; $ i ++; }Pokud výroky jsou podobně snadno:
for ($ i = 0; $ i < 10, $ i ++) {if (! $ i = 5) {print $ i, " \\ N ';; }}logické operátory pracují, jako to dělají v C:
Pro čísla:!
Others:
If máte pole, můžete vytvořit smyčku přes něj snadno foreach:
a = ("pes", "kočka", "úhoř"); foreach $ b (a) {print $ b, " \\ n ";}Foreach bere každý prvek polea a umístí jej v $ b, dokuda vyčerpán
PERL Poznámka:Musíte použít ". začněte " a " end &Quot ,.. šle - {a} - dokonce i na jednom řádku
Funkce
Můžete vytvořit podprogram se slovem sub Všechny proměnné předána podprogramu dorazit v poli s názvem _ Proto je. Následující kód funguje:
Show ("kočkou", "pes", "úhoře '); dílčí přehlídku {for ($ i = 0; i-$ = $ # _; $ i ++) {print $ _ [$ i], " \\ N ';;}}Nezapomeňte, že $ # vrací nej