Select Code to Download

#!/usr/bin/perl
use warnings;
...
print "\$y is = $y\n";
print "\$z is = $z\n";

$x is = 0
$y is = 0
$z is = 3

$x is = 0
$y is = 3
$z is = 2