Help for this page

Select Code to Download

Select or download this

sub func { print "first arg: $_[0]\n" }

...

first arg: main
first arg: main=ARRAY(0x80fbb0c)

Select or download this

sub test{
  my( $self, $name ) = @_;
  return $name;
}