Help for this page

Select Code to Download


  1. or download this
    sub whereami {
  my $self = shift;
...
      }
   }
}
  2. or download this
    sub foobar {
 my $foo = shift;
 my $bar = shift;
 # do stuff
}
  3. or download this
    sub foobar {
 my $bar = shift;
 my $foo = shift;
 # do stuff
}
  4. or download this
    grep {$_->[$row]} @{$self->{children}}; # I think!