note
cchampion
<p>Which version are you using?</p>
<p>Looks like you should upgrade ... </p>
<code>
$ perl -v
This is perl, v5.8.5 built for i386-linux-thread-multi
Copyright 1987-2004, Larry Wall
[SNIP]
$ perl -le '$_ = ($x) = (4, 5, 6); print'
3
$ perl -MO=Deparse,-p -le '$_ = ($x) = (4, 5, 6); print'
BEGIN { $/ = "\n"; $\ = "\n"; }
($_ = (($x) = (4, 5, 6)));
print($_);
-e syntax OK
$ perl -MO=Deparse,-p -le '$_ = ($x) = (4, 5, 6); print' | perl
-e syntax OK
3
</code>
<p>See also [id://309330] for another Deparse case.</p>
<p>HTH</p>
444545
444545