Select Code to Download

sub new {
  my $class = shift;
...
  # ... some code to populate attribs from passed parms
  return $self;
}

use MyMod;
my $mm = MyMod->new(atr1 => 1, atr2 => 'string2');