if (/^\s+total wire length\:\s+(\d.*\d)?/) {
  if (defined($1)) {
    $NetLength = $1;
    $c++;
  } else {
    $NetLength = "NaN";
  }
}