Select Code to Download

#!/c/opt/perl64/bin/perl
BEGIN {(*STDERR = *STDOUT) || die;}
...
printf "\ny: [$y]\n";

__END__

5 7 8
first set of dashes------------
...
y: [1]

$