Think about Loose Coupling | |
PerlMonks |
Re: Checking File Typesby Chmrr (Vicar) |
on Oct 10, 2002 at 01:34 UTC ( [id://204078]=note: print w/replies, xml ) | Need Help?? |
Be the perl interpreter for a second, and run though the for loop in your mind:
So what you're looking at is an and instead of an or. The simple fix in this case is to make use of grep:
..thus, if the grep returns a false value, (the empty list) it means that none of the matches worked, so we need to print an error. As a side note, proper indenting will make it easier for yourself and others to see what's going on at a glance. Update: See rob_au's answer for how not to reinvent the wheel. perl -pe '"I lo*`+$^X$\"$]!$/"=~m%(.*)%s;$_=$1;y^`+*^e v^#$&V"+@( NO CARRIER'
In Section
Seekers of Perl Wisdom
|
|