Instead of building the hash so complicated, build another key. In the old times perl did that for you.

$data{qw/3 h i/} = 'worked';

$data{@array} = 'worked';
[download]

this looks much easier to me.