Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -pw

...

$prev2 = $prev1;
$prev1 = $_;
  2. or download this
    me@mybox:~/sandbox
$ ./2.pl input.txt
...
cache,23778,0.0,0,0.0,0,0.0,0.0,0.00
cache,205,0.0,0,0.0,0,0.0,0.0,0.00
DISK-UTIL-PEAK-HIGH:,54.3,DISK-UTIL:,3.4  ### last line ###