my($hour, $minute, $second) = split /:/;
    $time2 = join(':', $hour, $minute);
  }