I generally recommend using a module for all date/time operations, as it will take over a lot of the details and work for you. There is Time::Piece, a core module since Perl v5.10:
use Time::Piece; my $t = localtime; print "Date1 is : ",$t->strftime("%d-%b-%Y"),"\n"; print "Date2 is : ",$t->strftime("%d-%m-%Y"),"\n"; print "Time1 is : ",$t->strftime("%H:%M:%S"),"\n"; print "Time2 is : ",$t->strftime("%I:%M:%S %p"),"\n"; __END__ Date1 is : 07-Okt-2017 Date2 is : 07-10-2017 Time1 is : 10:19:42 Time2 is : 10:19:42 # - OR - under the en_US locale: Date1 is : 07-Oct-2017 Date2 is : 07-10-2017 Time1 is : 10:19:42 Time2 is : 10:19:42 AM
And my personal favorite is DateTime, since it gives you a lot of powerful tools, including proper time zone handling. In the following I'm letting the module determine the current local time zone, although I recommend specifying one explicitly if possible. Note that it defaults to the en_US locale unless you specify a different one to the object.
use DateTime; my $dt = DateTime->now(time_zone=>'local'); print "Date1 is : ",$dt->strftime("%d-%b-%Y"),"\n"; print "Date2 is : ",$dt->strftime("%d-%m-%Y"),"\n"; print "Time1 is : ",$dt->strftime("%H:%M:%S %Z"),"\n"; print "Time2 is : ",$dt->strftime("%I:%M:%S %p %Z"),"\n"; __END__ Date1 is : 07-Oct-2017 Date2 is : 07-10-2017 Time1 is : 10:19:42 CEST Time2 is : 10:19:42 AM CEST
In general, I strongly recommend you Use strict and warnings.
In reply to Re: date and time using localtime
by haukex
in thread date and time using localtime
by sreek3502
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |