Help for this page

Select Code to Download


  1. or download this
    sub foo {
        my $arg = shift;
    ...
        my ($arg) = @_;
        # ...
    }
    
  2. or download this
    if ($foo == 0) {
        # ...
    ...
    if (0 == $foo) {
        # ...
    }