Win8 Strawberry 5.8.9.5 (32)  Sun 10/11/2020 21:47:54
C:\@Work\Perl\monks
>perl -Mwarnings
my $a=$x=$y=$z = 1;

print "|$a|$x|$y|$z|";
^Z
|1|1|1|1|

Win8 Strawberry 5.30.3.1 (64)  Sun 10/11/2020 21:45:55
C:\@Work\Perl\monks
>perl -Mwarnings
use v5.10;

my $a=$x=$y=$z = 1;

say "|$a|$x|$y|$z|";
^Z
|1|1|1|1|