perl语言中内置了大量的函数可供程序员使用:
shift
$name1=shift(数组 @name)
该函数是将数组name最左边的标量变量移出数组,然后赋给name1.如果shift中没有参数就作用与@_(一个子过程用来接外部参数的数组)或者是@AVGN(脚本用来接命令行参数的数组)
unshift
my num=unshft(@num, ())
将列表放在数组num的左边形成新数组num,返回num的元素个数。
sort
%num=sort key %num
按照num散列表中key的顺序排列该哈希表,返回排好的散列表
split
split /模式/ 字符串
将字符串按照模式分割返回字符串数组。
exists
exists 散列键值
如果存在,返回true,否则返回false
stat
@tmp=stat(文件描述符)
返回文件描述符对应的文件的属性的一个含有13个元素的数组
keys
@tmp=keys(%hash)
$tmp=keys(%hash)
在list上下文中返回hash中的键值列表,然后赋值给tmp数组
在sclar上下文中返回hash中的键值的总数量,然后赋值给tmp标量
readline
$tmp=readline file
@tmp=readline file
在sclar上下文下读取file文件的一行数据,赋给tmp
在list上下文下读取file文件的所有行数据,赋给tmp
glob
@tmp=glob 正则表达式
返回满足正则表达式的文件列表,赋给tmp
defined
defined expr
正则表达式定义返回true,不然返回false
阅读(1091) | 评论(0) | 转发(0) |