huangbaokang的博客

先验证linux是否安装了perl，使用perl -v测试 [root@localhost shell]# perl -v This is perl 5, version 16, subversion 3 (v5.16.3) built for x86_64-linux-thread-multi (with 33 registered patches, see perl -V for more ...

__FILE__, __LINE__, 和 __PACKAGE__ 分别表示当前执行脚本的文件名，行号，包名。 举例如下： #!/usr/bin/perl print "文件名 ". __FILE__ . "\n"; print "行号 " . __LINE__ ."\n"; print "包名 " . __PACKAGE__ ."\n"; # 无法解析 print "__F

Perl 中数组元素替换使用 splice() 函数，语法格式如下： splice @ARRAY, OFFSET [ , LENGTH [ , LIST ] ] 参数说明： @ARRAY：要替换的数组。 OFFSET：起始位置。 LENGTH：替换的元素个数。 LIST：替换元素列表。 以下实例从第6个元素开始替换数组中的5个元素: 实例 #!/usr/bin/perl @nums = (1...

特殊变量 $[ 表示数组的第一索引值，一般都为 0 ，如果我们将 $[ 设置为 1，则数组的第一个索引值即为 1，第二个为 2，以此类推。 举例： [root@localhost shell]# cat hello.pl #!/usr/bin/perl @test=qw(huang bao kang); print "@test\n"; $[=1; print "$test[1]\n"; pr...

函数参数使用特殊数组@_标明。 获取函数中的第一个参数$_[0]，第二个参数为$_[1] 举例如下： [root@localhost shell]# cat hello.pl #!/usr/bin/perl sub Average{ #获取所有传入的参数 $n = scalar(@_); $sum=0; foreach $item (@_){ $sum +=$item; } $...