連想配列に値をセットしていき、セットした順で
キーを抜き出したいのですが、これは無理なんでしょうか？

%hoge = ('aaa', 3, 'ccc', 2, 'bbb', 1);
foreach(%hoge){
print "$_ ";
}

欲しい結果
aaa 3 ccc 2 bbb 1