my@a;my@x=(10,19,0,14,20,5,0,5,12,8,3,5);my@y=(21,20,1,15,8,18,16,
18,0,1,11,18);$_=q{map{s@a,g@y;s@a,g@x;}@y;};s;s;unshift;g;s;g;pop
;g;eval;$_=q sprint join'',(' ','a'..'z')[s.(join',',@a).q;]\;;
;eval;