Help for this page
#!/usr/bin/perl -w use strict; ... $earlier = strftime "%H:%M", localtime($earlier); print "The current time is $now\nThe earlier time is $earlier\n";
=Output The current time is 15:40 The earlier time is 12:25