$ perl -E 'say localtime time; say scalar localtime'
1946222311091530
Mon Feb 23 22:46:19 2009

##</code><code>##

$ perl -E'$foo = localtime time; say $foo; $bar = localtime; say $bar'
Tue Feb 24 16:34:31 2009
Tue Feb 24 16:34:31 2009