Select Code to Download

 pickcpua.dat 

IMAGINGNY,1.45,0.42,1.54,1.49,1.47,1.36,1.81,0.47,1.8,0.55,0.38 
...
W32SDASALM01,1.22,1.3,1.11,0.92,1.57,1.06,1.01,0.87,0.93,2.26,0.91 
W32SMSCSD02,15.38,12,22.32,23.3,19.74,46.42,2.06,1.7,2.17,2.85,1.74 
W32SPLMCOR02,13.24,13.23,7.73,8.85,9.15,13.95,0,0,0,0,0

#!/usr/bin/perl 

...
my $average = $total /@values; 

print "Average CPU Time for all servers in cpuatest.dat file is $avera
+ge";

#!/usr/bin/perl 

...
  }     ## End of initial $index for loop 

close $CPUFILE or die;