Select Code to Download

my $array->[0] = $arg{key1};
my $key->[0] = 'key1' if ($array->[0]);

sub _sub {
...
$array->[3] = $arg{key4};
...
}

_sub(key3 => 'big-mama');