Help for this page

Select Code to Download


  1. or download this
    sub new {
       my $class=shift;
    ...
       my %args=@_;
       #....
    }
    
  2. or download this
      my $foo=Foo->new(100);
      my $foo=Foo->new(100,%ARGS);
      my $bar=Bar->new(%ARGS);
      my $bar=Bar->new();