Help for this page

Select Code to Download

Select or download this

sidhekin@blackbox:~$ perl
my ($x, $y) = (0, 0);
...
$x: '0'
$y: ''
sidhekin@blackbox:~$