Perl 监控批量错误

<pre name="code" class="sql">#!/usr/bin/perl $dir='/home/websphere/WebSphere/AppServer/profiles/AppSrv01/logs/server1'; $file = 'SystemErr.log'; $mon_file="$dir/$file"; print "\$mon_file is $mon_file

>>阅读原文<<