Select Code to Download

#!/usr/local/bin/perl
use strict;
...
}

my $pcpuavg = $sttotal / $ct;

 PID   TIME                        CPU% NAME
  5257 Wed Aug  8 23:47:07 2001    2.88 ns-httpd
...
 10103 Fri Aug 10 20:00:17 2001    3.77 ns-httpd
 10103 Fri Aug 10 20:30:16 2001    4.94 ns-httpd
 10103 Fri Aug 10 21:00:16 2001    2.78 ns-httpd