Thank you very much for your explications; now I understand the order in which the braces are solved.
I'm just trying to enhance a script not written by me, and the only stuff I do in the moment is tracking some nice errors and the consequences if I fix them (does this man really want to say what he's saying??? sometimes yes, sometimes no :-)...

This code was one of the most beautiful examples I found (description is totally different with code), and I got totally puzzled by the first ), tried this code, and it's output puzzled me more.

But I will see if I can change it

Best regards,
perl -le "s==*F=e=>y~\*martinF~stronat~=>s~[^\w]~~g=>chop,print"