if ($time[2] =~ /[\d]/) {
  $time[2] = "0$time[2]";}