Select Code to Download

c:\@Work\Perl>perl -wMstrict -le
"sub S { print qq{S got $_[0]}; }
...
$v starts as 0
S got 33
$v now 33