i need a quick oneliner for this script if one exists Happy?

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

:D