Select Code to Download

Win8 Strawberry 5.8.9.5 (32)  Sun 10/11/2020 21:47:54
C:\@Work\Perl\monks
...
say "|$a|$x|$y|$z|";
^Z
|1|1|1|1|

Win8 Strawberry 5.8.9.5 (32)  Sun 10/11/2020 21:48:09
C:\@Work\Perl\monks
...
dd $a, $x, $y, $z;
^Z
(7, 7, 7, 7)