$ perl -Mre=debug -e" $_ =qq{foo bar \ntest}; m/(? (5) 5: SUCCEED (0) 6: TAIL (7) 7: PLUS (9) 8: SPACE (0) 9: EXACT (11) 11: PLUS (13) 12: SPACE (0) 13: EXACT (15) 15: END (0) floating "test" at 5..2147483647 (checking floating) minlen 9 Guessing start of match in sv for REx "(? | 1:UNLESSM[-3](7) 0 <> | 7:PLUS(9) SPACE can match 0 times out of 2147483647... failed... 1 | 1:UNLESSM[-3](7) 1 | 7:PLUS(9) SPACE can match 0 times out of 2147483647... failed... 2 | 1:UNLESSM[-3](7) 2 | 7:PLUS(9) SPACE can match 0 times out of 2147483647... failed... 3 < bar %n> | 1:UNLESSM[-3](7) 0 <> | 3: EXACT (5) 3 < bar %n> | 5: SUCCEED(0) subpattern success... failed... 4 < bar %nt> | 1:UNLESSM[-3](7) 1 | 3: EXACT (5) failed... 4 < bar %nt> | 7:PLUS(9) SPACE can match 3 times out of 2147483647... 7 | 9: EXACT (11) 10 < bar> < %ntest> | 11: PLUS(13) SPACE can match 2 times out of 2147483647... 12 < bar %n> | 13: EXACT (15) 16 < bar %ntest> <> | 15: END(0) Match successful! Freeing REx: "(?