Select Code to Download

my $obj = Module->new(log => $obj, arg1 => $arg1);

my $obj = Module->new($log, $arg1, $arg2);

my $obj = Module->new($log, %args);

sub new {
    my $self = shift;
...
    
    # do stuff
}

sub new {
    my $self = bless {}, shift;
...
sub _log {
    return shift->{log};
}