Help for this page
keys%{{@A,reverse@A}} # Then again... keys%{{map{$_,$_}@A}} # Maybe it's a tie with tye.
keys%{{map{$_,1}@A}} # Oh duh! OK. One under. :-)