Select Code to Download

while ( $window =~ m/([a-zA-Z]{3}\s{1,2}\d{1,2}.*\n)/oigc  ) {
            $line = $1;
...
                &$callback($line);
            }
        }

ls -ltrh /var/log/syslog-ng/server2/ | grep maillog.2
-rw-r----- 1 root logs 484M Mar 11 11:13 maillog.2
...
Thu May  1 19:31:57 CDT 2008

Time Taken: 189 Seconds