$ perl -le 'my $x = localtime; print $x'
Tue Apr  4 11:25:49 2006

$ perl -le 'my($x) = localtime; print $x'
52