http://www.perlmonks.org?node_id=1014221


in reply to Is it evaluated in scalar or list context?

In your example, my ($var1, $var2, $var3, $var4); is used to declare, not assign:

my $var = something;    # declare then assign in scalar context
my ($var) = something;  # declare then assign in list context

...

my ($var1, $var2, $var3, $var4); # declare


$var1 = something1 ; # assign in scalar context
$var2 = something2 ; # assign in scalar context
$var3 = something3 ; # assign in scalar context
$var4 = something4 ; # assign in scalar context

[download]

In Section Seekers of Perl Wisdom