Help for this page

Select Code to Download

Select or download this

$ perl -MDateTime -le"print DateTime->now->strftime( q!%F-%H-%M-%S%z! 
+);"
2011-04-06-07-04-11+0000

$ perl -MDateTime -le"print DateTime->now( qw[ time_zone local ] )->st
+rftime( q!%F-%H-%M-%S%z! );"
2011-04-06-00-04-29-0700

Select or download this
```
foo.pl-00
foo.pl-01
```