Select Code to Download

sub new {
    my ($class, @args) = @_;
...
    bless $self, $class;
    $self;  #returns $self (reference to a hash)
}