http://qs321.pair.com?node_id=405825

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
makes the hour (right now in the Midwest) 18. How can I convert this back into real 12 hour time so it reads 6?