5 min load average
 

hi this is an emergency if any one can help me to find the 5 min load average on a windows 200 box using net statistics server command
through a perl script on windows

i have a linux script which does this but have no clue how to make this work in windows plz can anyone help this is utter emergency

the linux code is

#!/usr/local/bin/perl
# Description: 5-min load average.
# Sample User Defined Event monitoring script.
$ENV{PATH} = "/bin:/usr/bin:/usr/sbin";
$DATA = `uptime`;
$DATA =~ /average:\s+([\.\d]+),\s+([\.\d]+),\s+([\.\d]+)\s*$/;( knoi need explanation for this line as well) )
if (defined $2) {
print "em_result=$2\n";
} else {
die "Error collecting data\n";
}

the net statistics server helps to get the values
can anyone help me with a pl script for windows which does the same