Activeperl Arrays

nction est un morceau de code qui accomplit une tâche pour vous. Vous pouvez écrire vos propres fonctions. L'interpréteur Perl ou ActivePerl est livré avec des fonctions déjà écrit pour vous, juste à utiliser. Certaines de ces fonctions sont utilisées avec les tableaux. Dans ActivePerl, les fonctions sont appelées sous-routines. Nous apprenons les fonctions de tableau, maintenant. La fonction Push Considérons le tableau,hisArr = ("HBWE", "FGTR", "HTNK", 4587, 4526, 4053, "AB12", "GB58», «TG45", "RE69"); Le nom du tableau est icihisArr.

Voir également la liste, ("xxx", "yyy", "zzz") Dans ActivePerl une liste est donnée entre crochets. Vous pouvez ajouter (ajouter à la fin) les trois éléments (valeurs) de la liste au tableau. La syntaxe pour ce faire est: push (TABLEAU, LISTE) Dans notre exemple, vous auriez, push (hisArr, ("xxx", "yyy", "zzz")); Lire et essayer le code suivant: use strict; print "Content-Type: text /html \\ n \\ n"; monhisArr = ("HBWE", "FGTR", "HTNK", 4587, 4526, 4053, "AB12", "GB58», «TG45", "RE69"); poussoir (hisArr, ("xxx", "yyy", "zzz")); hisArr d'impression; La sortie du code ci-dessus montre la liste annexée.

Eh bien, les éléments de la sortie ne sont pas séparés par des virgules. Ne vous inquiétez pas à ce sujet pour tondre. La fonction push retourne le nouveau nombre d'éléments dans le tableau résultant. La fonction unshift La fonction unshift fait le contraire de la fonction Push. Il prepends une liste en face d'un tableau, retournant le nouveau nombre d'éléments dans le tableau résultant.

La syntaxe est: unshift (TABLEAU, LISTE) Dans notre cas, vous auriez, unshift (hisArr, ("xxx", "yyy", "zzz")); Lire et essayer le code suivant, use strict; print "Content-Type: text /html \\ n \\ n"; monhisArr = ("HBWE", "FGTR", "HTNK", 4587, 4526, 4053, "AB12", "GB58», «TG45", "RE69"); unshift (hisArr, ("xxx", "yyy", "zzz")); hisArr d'impression; La fonction de pop La fonction de pop retire le dernier élément du tableau et retourne, en raccourcissant le tableau original par un élément.

La syntaxe est, pop (Array); Dans notre cas, vous auriez, pop (hisArr); Lire et essayer le code suivant: use strict; print "Content-Type: text /html \\ n \\ n"; monhisArr = ("HBWE", "FGTR", "HTNK", 4587, 4526, 4053, "AB12", "GB58», «TG45", "RE69"); my $ returnValue = pop (hisArr); print $ returnValue; print "hisArr d'impression; La quatrième déclaration ci-dessus, pops du dernier élément du tableau affecter la valeur retirée à la nouvelle variable, $ returnValue