Select Code to Download

my %hash;
my $blah = function(\%hash);
warn Dumper \%hash; # prints a bunch of values

sub function {
my ($hash) = @_;
...
$hash->{auth}->{user} = "jacques"

}

sub function {
my ($hash) = @_;
...

$hash->{auth}->{user} = "jacques";
}

Package MyModule;

...
}

1;