$ perl -e '%a=(1=>"a",2=>"b",3=>"c"); print %a,"\n"'

##</code><code>##

2b3c1a
3c1a2b
...