Help for this page
Select Code to Download
Select
or
download this
my ($a, $b, $c) = (0) x 3; print "$a - $b - $c";