Guys, it is not homework...

I'm not using Perl extensively and therefore I'm not aware of all the options. All I wanted is a little help... No need to make a fuss.

perlpie, many thanks for your answer. I did not know the '/e' operator.