C:\> perl -MO=Deparse,-p -le "$_ = ($x) = (4, 5, 6); print"
BEGIN { $/ = "\n"; $\ = "\n"; }
($_ = (($x) = (4, 5, 6)));
print($_);
-e syntax OK
C:\>perl -le "$_ = ($x) = (4, 5, 6); print"
3
C:\>perl -v

This is perl, v5.8.1 built for MSWin32-x86-multi-thread
(with 1 registered patch, see perl -V for more detail)

Copyright 1987-2003, Larry Wall

Binary build 807 provided by ActiveState Corp. http://www.ActiveState.
+com
ActiveState is a division of Sophos.
Built 18:19:11 Nov  3 2003
[download]

What versions are you running?