if ( $line =~ /(\d+:\d\d):\d\d (?:GMT|SAST)/ ) {
    my $the_hour_and_minute = $1;
}