![](https://img-blog.csdnimg.cn/20201014180756926.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
perl
squidipt
支持原创!
展开
-
Perl引用学习
1、数组引用 [root@trffic2 perl]# cat reference.pl #!/usr/bin/perl my @array =qw/John Paul May/; my $array_ref = /@array; #print @{$array_ref}; print "${$array_ref}[0]/n"; print "${$array_ref}[1]/n"; print "${$array_ref}[2]/n"; print "${$array_ref}[3]/n原创 2011-02-24 11:17:00 · 604 阅读 · 0 评论 -
Perl中预定义的一些常见特殊变量
<br />一、正则表达式特殊变量:<br /> 1、$n:包含上次模式匹配的第n个子串<br /> 2、$&:前一次成功模式匹配的字符串<br /> 3、$`:前次匹配成功的子串之前的内容<br /> 4、$':前次匹配成功的子串之后的内容<br /> 5、$+:前一次使用括号的模式匹配的字符串.<br /> 二、文件句柄特殊变量:<br /> 1、$|:如果设置为零,在每次调用函数write或print后,自动调用函数fflush,将所写内容写回文件<br /> 2、$%:当前输原创 2011-02-24 11:12:00 · 831 阅读 · 0 评论