if ($tt eq 'pm') {
$hh += 12;
}

if ($ttt eq 'pm') {
$thh += 12;
}