One small problem,

It seems perl gets confused when you name a subroutine after a named function, such as 'y'. When running this with perl5.6 i get:

Transliteration replacement not terminated at foo.pl line 1.
[download]

If i replace the letter 'y' with 'r' (or some other non-used single letter) it works correctly.

jynx