in reply to Re^3: my $x or my ($x)
in thread my $x or my ($x)

I prefer slicing. Instead of:

my (undef, $foo, undef, $bar) = @array;

or

(undef, my $foo, undef, my $bar) = @array;

do:

my ($foo, $bar) = @array[1,3];

e.g.

my ($size, $mtime) = (stat $filename)[7,9];