my (undef, $min, $hr, $day, $mon, $year) = localtime();

##</code><code>##

my ($min, $hr, $day, $mon, $year) = (localtime())[1..5];