Help for this page
Select Code to Download
Select
or
download this
sub list { return 1..5 } my ($a,$b,$c); ... print "$n1 ... $n2\n"; ---- 5 ... 3