Help for this page

Select Code to Download


  1. or download this
    abc('hello', 3271, 33, 44);
    sub abc{
            my $a = shift;
            print "$a $_\n" for (@_)
    }