See also:
In reply to Re^2: Syntax Perl Version support $c = () = $a =~ /\./g by eyepopslikeamosquito in thread Syntax Perl Version support $c = () = $a =~ /\./g by h2