when i try your line i just get Can't find string terminator "'" anywhere before EOF at -e line 1. Im probally doing something wrong but im just beginning with pearl so bear with me :)

If you are using Losedows you will need to change the surrounding single quotes to double quotes and escape all the double quotes in the Perl. You may find it easier to put the solution in a file. One liners in Losedows are more awkward than in *u*x.

Regards,

John Davies