#!/usr/bin/perlmy$message=‘‘;$message=supperMonitor();@strArr=split(/\n/,$message);my$i=1;my$count=1;my$msg=‘‘;while($count<=@strArr){$msg.="====$strArr[$count-1]==\n";if($i==5){print"==$i=$msg==\n";$msg=‘‘;$i=0;}$i++;$count++;}
分类：
编程语言 时间：
2016-01-26 18:47:44
阅读次数：
212
