note
choroba
List assignment:<c>
my ($x, $y, $z) = qw( 1 2 3 );
</c><P>
List assignment in list context produces a list of lvalues:<c>
(my ($x, $y, $z) = qw( 1 2 3 )) = qw( a b c ); # $x = 'a', $y = 'b', $z = 'c'.
</c><P>
List assignment in scalar context:<c>
print scalar (my ($x, $y, $z) = qw( a b c d )); # 4
</c><P>
Modifying a scalar assignment:
<c>
($x = 12) =~ s/1/4/; print $x; # 42
</c><P>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-832495">
<c>map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]</c>
</div></div><!-- Wiki2Monks {"version":1.16} -->
11120008
11120008