my %avgsHash;
@avgsHash{ @cols } = map {to_decimal($_)} @avgs;
print "Server,Statistic,Average\n";
printf("%s,%f\n", $_, $avgsHash{$_}) for @cols;

##</code><code>##

Server,Statistic,Average
ERRWWW_CPUPCT,5.1221
ERRWWW_RAMPCT,12.2332