User
#!/usr/bin/perl $a=<>; for(;;){ $c=$s=""; $s.=$a=~s/$_//?$c=$_:" "for split//,"Congratulations on a programmer's day!"; $c?print"$s\n":exit }
В первом примере вторая таблица не проще первой, а третья таблица, по описанию, является и минималистичной и простой.
И да, с праздником всех причастных!
Более человеческая версия:
Увы, на русском написать не получилось — многобайтовая кодировка добавит десяток байт к коду.