$_=$";$^=A;&{':'};sub AUTOLOAD{print$AUTOLOAD=~/:+(.?)/s;goto$^++}J:&h;
A:&J;B:&u;D:&t;E:&$_;F:&a;G:&n;L:&r;O:&e;Q:&l;R:&$_;S:&h;T:&a;V:&k;W:&e
;X:&r;Y:&{','};Z:&{$/};C:&s;H:&o;I:&t;P:&r;M:&$_;U:&c;N:&P;K:&e;AA:rjk;