in reply to IF condition that doesnt work

It is good to have the entire code listed, but could you point out exactly which part doesn't seem to be working?

Not part of your problem but a good to know, tr can take an entire list of characters and transliterate them to a second list, so instead of doing one for each letter you can do something like:

$vNombre=~ tr/αιν/aei/;
Less typing and probably quite a bit more efficient.

                - Ant
                - Some of my best work - (1 2 3)