摘要:
perl中的引用和C中的指针一样,用"\"标识,引用后可使用符号“->”取值。解引用则在对应的数据类型前加$,@ 或%。 这里这里用两数组求和做示例,引用传递的子函数的用法。 1 use strict; 2 3 my @s1=(1,13,4,25,6,27,8,22); 4 my @s2=(11,2 阅读全文
摘要:
1 #!/usr/bin/perl -w 2 use strict; 3 use FindBin qw($Bin $Script); 4 5 my $rp=$Bin; 6 print "the script dir:$rp\nscript name:$Script\n"; 7 8 use Cwd q 阅读全文