Help for this page

Select Code to Download


  1. or download this
    use Time::Piece;
    my $t = localtime;
    ...
    Date2 is : 07-10-2017
    Time1 is : 10:19:42
    Time2 is : 10:19:42 AM
    
  2. or download this
    use DateTime;
    my $dt = DateTime->now(time_zone=>'local');
    ...
    Date2 is : 07-10-2017
    Time1 is : 10:19:42 CEST
    Time2 is : 10:19:42 AM CEST