Help for this page

Select Code to Download


  1. or download this
    #!perl

...
>  oracle 26161 c Tue Nov  2 03:10:33 2010
<  sybase 26188 c Tue Nov  2 03:10:38 2010
>  sybase 26163 c Tue Nov  2 03:10:58 2010
  2. or download this
    $ cron_log_prob.pl
oracle - JobID: 26161 - Runtime: 03:10:33 - 03:10:25
sybase - JobID: 26163 - Runtime: 03:10:58 - 03:10:32
  3. or download this
    ...
my %wanted_user = map { $_ => 1 } qw{oracle sybase};
...
    my ($mode, $user, $jobid, $timestamp) = (split)[0, 1, 2, 7];
    next if not $wanted_user{$user};
    ...