in reply to one hash value (array) into another

Here is one way to do it: 
map (push (@{$hash{'two'}}, $_), @{$hash{'one'}});

[download]

In Section Seekers of Perl Wisdom