perl笔记(二)

2017-08-10 19:42:39来源:CSDN作者:wufenghsk人点击

分享
if(){} 条件为真时,执行unless(){} 条件为假时,执行while(){} 条件为真时,循环执行until(){} 条件为假时,循环执行last 跳出循环,相当于breaknext 进入下一次循环,相当于continue文件相关-e $file  测试文件是否存在,存在为真-r 文件或目录,是否可读-w 文件或目录,是否可写-x 文件或目录,是否可执行-e 文件或目录,是否存在-d 是目录-f 是普通文件-l 是符号链接my @field = stat($filename);unlink($filename);删除文件,不能删除目录rename($old,$new);重命名文件link(src,dst);硬链接symlink(src,dst);软连接mkdir($path,"0755");创建目录rmdir($path);删除目录日期相关my $tt=localtime;my $tt=gmtime;my $pos = index($string,$key);查找key在string中的首次出现的位置my $pos = rindex($string,$key);从末尾开始查找,结果与上面一样my $s = substr($string,$start,$len);获取子串my $s = sprintf("%d dvnksdk",$num);格式化字符串my $money = sprintf("%.2f",2.345);格式化浮点数system($cmd);#perl阻塞,等待子进程运行结束exec($cmd);#perl进程结束,跳转到子进程my $res = `$cmd`;#获取运行结果

最新文章

123

最新摄影

闪念基因

微信扫一扫

第七城市微信公众平台