Re: $_ and nested while loops w/angle operator

in reply to $_ and nested while loops w/angle operator

Why not use the range operator and make the issue moot:

my $query;
while (<FH>) {
    if (my $i = /^"\@QUERY:(.*)"/.../^"\@ENDQUERY"/) {
        $query = $1, next if $i == 1;
        next if $i =~ /E/;
        print;
    }
}
[download]

Comment on Re: $_ and nested while loops w/angle operator Download Code

Replies are listed 'Best First'.
Re: Re: $_ and nested while loops w/angle operator by cLive ;-) (Prior) on Apr 06, 2004 at 00:29 UTC
~~Won't work. You're trying to match a multiline string on one line of input.~~ must... wake.. up cLive ;-)	[reply]

In Section Seekers of Perl Wisdom