Re^3: my $x or my ($x)

The only warning I can give is that using an undef in the list will throw warnings (errors?) in older versions of perl:
my (undef, $foo, undef, $bar) = @array;

Never fear. Just move your my.

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

This is particularly more useful in cases where you already have a declared variable.

my $foo = "ab";
(my $avar, $foo) = ($foo =~ /(.)(.)/);
[download]

my @a=qw(random brilliant braindead); print $a[rand(@a)];

Comment on Re^3: my $x or my ($x) Select or Download Code

Replies are listed 'Best First'.
Re: my $x or my ($x) by benizi (Hermit) on Apr 25, 2006 at 15:45 UTC
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];`	[reply] [d/l] [select]