my ($description1, $cktsizetemp1, $bits1, $availability1, $bitsin1, $bitsout1)
     = split /,/, $line1;
$availability1 = sprintf("%.2f", $availability);