my $T = 'AM';
if ($hour > 12) {
   $hour -= 12;
   $T = 'PM';
}