perl -w -E 'say (localtime)[1]'
say (...) interpreted as function at -e line 1.

##</code><code>##

my $x = (localtime)[1];

##</code><code>##

return (localtime)[1];