It would behoove you to listen next time you're told something. First off, we already established that this question is not overly Perl related. Asking it again with the (spurious) addition of the word "Perl" will not get a greater response.

In the same theme, I already pointed you to a discussion which happens to reiterate this exact point from many different people, multiple times.

perl -pe '"I lo*`+$^X$\"$]!$/"=~m%(.*)%s;$_=$1;y^`+*^e v^#$&V"+@( NO CARRIER'