Help for this page

Select Code to Download


  1. or download this
    sub foo
    {
        my $x = shift;
        my $y = shift;
        ...
    
  2. or download this
    sub foo
    {
        my ($x, $y) = @_;
        ...