Help for this page

Select Code to Download


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