项目中用perl脚本检测目录下最新文件的大小是否在变化,用到了如下代码:
my @output = $tel->cmd('ls -lt'); //时间顺序排序
发现当文件过多时output会发生内存溢出,即空间不够的情况,采用了head命令解决,代码如下:
my @output = $tel->cmd('ls -lt|head -2'); //head -n filename 显示指定文件的前n行,对应有tail命令
项目中用perl脚本检测目录下最新文件的大小是否在变化,用到了如下代码:
my @output = $tel->cmd('ls -lt'); //时间顺序排序
my @output = $tel->cmd('ls -lt|head -2'); //head -n filename 显示指定文件的前n行,对应有tail命令