网络飞鸥

pop 操作将数组的最后一个元素取出并返回：   $fred=pop(@array);      #$fred 得到 9，@array 现在为（5，6，7，8） $barney=pop@array;    #$barneygets8,@array 现在为（5,6,7）pop@array;                   #@array 现在为（5，6）(7 被丢弃了)最后一个例子中，p...

Perl中的一个非常有用的函数是split, split 把字符串进行分割并把分割后的结果放入数组中。这个函数使用规则表达式（RE），如果未特定则工作在$_变量上。   split函数可以这样使用：$info = "Caine:Michael:Actor:14, Leafy Drive";@personal = split(/:/, $info);其结果是： @personal = ("Ca...

======================================= [开关项][描述]======================================= -0规定记录分隔符 -a与 -n 或者 -p 一起使用， 负责打开自动拆分模式， 用于对空白字符进行隐式拆分， 并将字段放入数组 @F 中， 例如：date | Perl -ane 'print "$F[0] "...

  Perl编译指示 ===================================== [编译指示][用途]===================================== use autouse提供了一种机制， 使得只有调用模块中的函数才能在运行时加载该模块   use base让程序员根据编译时列出的父类声明派生类， 从而不再需要使用 require 。 ...

=================================================================perl中获取当前系统路径 在perl的程序当中，有时候会用到当前的系统路径。 perl中获取当前李靖有两种方法：1、使用CWD包     use Cwd;     print getcwd; 2、使用环境变量     print $ENV{'PWD'}; ...