Re^2: grep flip flop (range operator)

Bingo. Thanks.

That "Range Operators" page I have now read in my console via perldoc -f ..

It dawned on me after posting that the first condition is never true and I came up with

$ perl  -le " print for grep { my $what = scalar($Q++==0 ..($_ eq q{Q}
+)); warn $what; $what } qw{ a b c Q r s }; "
1 at -e line 1.
2 at -e line 1.
3 at -e line 1.
4E0 at -e line 1.
Warning: something's wrong at -e line 1.
Warning: something's wrong at -e line 1.
a
b
c
Q
[download]

Comment on Re^2: grep flip flop (range operator) Download Code

Replies are listed 'Best First'.
Re^3: grep flip flop (range operator) by frozenwithjoy (Priest) on Sep 13, 2012 at 07:34 UTC
To make things a bit more readable, you could use the match-once operator like this: `perl -le " print for grep ?? .. /Q/, @ARGV " a b c Q r s ___ a b c Q` [download]	[reply] [d/l]
Re^4: grep flip flop (range operator) by Anonymous Monk on Sep 13, 2012 at 07:37 UTC
Uh-oh `$ perldoc -f ?? No documentation for perl function '??' found` [download]	[reply] [d/l]
Re^5: grep flip flop (range operator) by frozenwithjoy (Priest) on Sep 13, 2012 at 07:42 UTC
Ah, take a look at Regexp Quote Like Operators and then search for `m??`. In my snippet, I shortened `m??` to `??`.	[reply] [d/l] [select]
Re^6: grep flip flop (range operator) by Anonymous Monk on Sep 13, 2012 at 07:55 UTC