$ perl -wE 'say keys [1, 2]'
01
$ perl -wE 'say keys { a => 1, b => 2 }'
ab

##</code><code>##


$returns{'do_stuff'} = do_stuff();

print keys($returns{'do_stuff'}->[2] ) , "\n";


sub do_stuff {
    my %chassis = ( a => 1, b => 2 );
    my @returns = (0 , "Success" , \%chassis);
    return(\@returns);
}
__END__
ab