Help for this page

Select Code to Download

Select or download this


use strict;
...
print $dt1->printf("dt1 %c %Z\n");
print $dt2->printf("dt2 %c %Z\n");

Select or download this

$ perl ./testdate
dt1 ftw!
dt1 Fri May  2 07:53:00 2003 JST
dt1 Fri May  2 04:23:00 2003 IST
dt2 Fri May  2 05:53:00 2003 IST