use strict;
use warnings;
$| = 1;

my (undef, $min, $hr, undef, $mon) = localtime;   # Okay
# my (undef, $min, $hr, , $mon) = localtime;      # Okay but unexpected/weird result
# my ( ,  $min, $hr, , $mon) = localtime;         # Syntax error

print "\nMinutes = $min\nHours = $hr\nMonths = $mon\n\n";