On 6/23/07, Mathew Snyder <[EMAIL PROTECTED]> wrote:
foreach my $address (readline AUTHFILE){ chomp($address); next if $address =~ m/^#/gmx;
The author of that code probably doesn't know what /g, /m, and /x do for a pattern match. When you know how to use them, they're powerful tools. In this case, they break your code, and I'd get rid of all three. Hope this helps! --Tom Phoenix Stonehenge Perl Training -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/