Help for this page

Select Code to Download

Select or download this

sub foo {
   my $foo = shift;
...
sub foo {
   my ($foo,$bar) = shift;
}

Select or download this
```
sub foo {
   my ($foo) = @_;
}
```