摘要：
perl中的引用和C中的指针一样，用"\"标识，引用后可使用符号“->”取值。解引用则在对应的数据类型前加$，@ 或%。 这里这里用两数组求和做示例，引用传递的子函数的用法。 1 use strict; 2 3 my @s1=(1,13,4,25,6,27,8,22); 4 my @s2=(11,2 阅读全文
posted @ 2020-11-20 15:42
un-define
阅读(646)
评论(0)
推荐(0)
摘要：
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 阅读全文
posted @ 2020-11-20 11:34
un-define
阅读(182)
评论(0)
推荐(0)
浙公网安备 33010602011771号