perl -nF -E '@h{split"",ARNDBCEQZGHILKMFPSTWYV}=1..22;say"@h{@F}"'


##</code><code>##

perl -nF -E '@h{ARNDBCEQZGHILKMFPSTWYV=~/./g}=1..22;say"@h{@F}"'