Select Code to Download

sub new
{
    my ($class, $args) = @_;
...
    $self->init( $args->{init} );
    return $self;
}

sub new
{
    my ($class, $args) = @_;
    return unless $args;
    # ...

sub new
{
    my ($class, $args) = @_;
    return unless $args;
    return unless UNIVERSAL::isa( $args, 'HASH' );
    # ...