Perl教学第十二篇 Perl5中的引用之二

时间： 2021-07-31 作者：daque

运转截止如次：$ test 1 2 3 4 pointer address of argv = array(0x806c378)number of arguments : 40 : 1;1 : 2;2 : 3;3 : 4; 第5即将援用$pointer指向数组@argv，第6行输入argv的地方。$pointer归来数组第一个元素的地方，这与c谈话中的数组南针是一致的。第7行挪用因变量scalar()赢得数组的元素个数，该参数亦可为@argv，但用南针则必需用@$pointer的情势指定其典型为数组，$pointer给出地方，@标记证明传播的地方为数组的第一个元素的地方。第10行与第7行一致，第11行用情势$$pointer[$i]列出一切元素。对关系数组运用反斜线操纵符的本领是一律的--把一切关系数组名换成援用$poniter。提防数组和大略变量（标量）的援用表露时均带有典型--array和scalar，哈希表（关系数组）和因变量也一律，辨别为hash和code。底下是哈希表的援用的例子。#!/usr/bin/perl1 #2 # using associative array references3 #4 %month = (5 '01', 'jan',6 '02', 'feb',7 '03', 'mar',8 '04', 'apr',9 '05', 'may',10 '06', 'jun',11 '07', 'jul',12 '08', 'aug',13 '09', 'sep',14 '10', 'oct',15 '11', 'nov',16 '12', 'dec',17 );1819 $pointer = \%month;2021 printf "\n address of hash = $pointer\n ";22 23 #24 # the following lines would be used to print out the25 # contents of the associative array if %month was used.26 #27 # foreach $i (sort keys %month) {28 # printf "\n $i $$pointer{$i} ";29 # }3031 #32 # the reference to the associative array via $pointer33 #34 foreach $i (sort keys %$pointer) {35 printf "$i is $$pointer{$i} \n";36 } 截止输入如次：$ mthaddress of hash = hash(0x806c52c)01 is jan02 is feb03 is mar04 is apr05 is may06 is jun07 is jul08 is aug09 is sep10 is oct11 is nov12 is dec

Perl教学第十二篇 Perl5中的引用之二

相关推荐

推荐下载

热门阅览

最新排行

Perl教学 第十二篇 Perl5中的引用之二

相关推荐

推荐下载

热门阅览

最新排行

Perl教学第十二篇 Perl5中的引用之二