perlmeditation
ikegami
<p>There are two assignment operators, the list assignment operator and the scalar assignment operator. If the LHS of an assignment is some kind of aggregate, the list assignment is used. Otherwise, the scalar assignment is used. The following are considered to be aggregates:</p>
<ul>
<li><c>(...)</c> (any expression in parens)
<li><c>@array</c> and <c>@array[...]</c>
<li><c>%hash</c> and <c>@hash{...}</c>
<li><c>my (...)</c>, <c>our (...)</c> and <c>local (...)</c> (<c>state (...)</c> throws an error.)
</ul>
<p>There are two differences between the operators. The first is the context in which operands are evaluated:</p>
<ul>
<li>The scalar assignment evaluates both of its operands in scalar context.
<li>The list assignment evaluates both of its operands in list context.
</ul>
<p>The second difference is in what they return:</p>
<table border=1>
<tr><th colspan=2 rowspan=2>Returns</th><th colspan=2>Context in which Assignment Operator is Evaluated</th></tr>
<tr><th>scalar</th><th>list</th></tr>
<tr><th rowspan=2>Operator</th><th>scalar assignment</th><td>The LHS as lvalue</td><td>The LHS as lvalue</td></tr>
<tr><th>list assignment</th><td>The number of elements returned by RHS</td><td>The elements returned by LHS as lvalues</td></tr>
</table>
<p>Note that the right-hand side is used for the list assignment in scalar context.</p>
<p>Finally, here are some examples:</p>
<table border=1>
<tr><th colspan=2 rowspan=2>Examples</th><th colspan=3>Context in which Assignment Operator is Evaluated</th></tr>
<tr><th>[any]</th><th>scalar</th><th>list</th></tr>
<tr><th rowspan=2>Operator</th><th>scalar assignment</th><td valign="top"><c>
# Array evaluated in scalar context.
my $count = @array;
</c></td><td valign="top"><c>
# The s/// operates on $copy.
(my $copy = $str) =~ s/\\/\\\\/g;
</c></td><td valign="top"><c>
# Prints $x.
print($x = $y);
</c></td></tr>
<tr><th>list assignment</th><td valign="top"><c>
# Array evaluated in list context.
my @copy = @array;
</c></td><td valign="top"><c>
# Only dies if f() returns an empty list.
# This does not die if f() returns a
# false scalar like zero or undef.
my ($x) = f() or die;
</c><c>
my $count = () = f();
</c></td><td valign="top"><c>
# Prints @x.
print(@x = @y);
</c></td></tr>
</table>
<p>Related topics:
<ul>
<li>[id://527973].
</ul>
<p><b>Update</b>: Added examples.
<br><b>Update</b>: Incorporated JavaFan's additions.
<br><b>Update</b>: Removed list slices and mentioned <c>state</c>.
<br><b>Update</b>: One of the examples in the scalar context column did not depend on context. It has been moved to its own column. Also, added short explanations of examples.
</p>