$_ = 'NDDDDTSVCLGTRQCSWFAGCTNRTWNSSA 0'; my @F = split ''; @h{A..Z}=('279414924129124349625833694149780366935145850119816393903151901525290851349853' =~/.../g);say"@h{@F}";