Select Code to Download

See whether you can produce a pattern to match a standard time format.
+ All
the following should be acceptable: 12:00am, 5:00pm, 8:30AM. These sho
+uld probably not be accepted: 3:00,2:60am, 99:00am, 3:0pm.

#!/usr/bin/perl -w
use strict;
...
        $input = <STDIN>;
    }
}

Last login: Thu Aug 18 11:28:44 on ttys000
...
12:30PM 
That is a valid time!
youngs-mac-mini:Documents fenimore$

        if($1 > 1 || $2 > 2 || $3 > 6)