$ perl -E'say "pl" =~ /p.{1,6}/' 1 $ perl -E'say "pl" =~ /p.{2,6}/' $ perl -Mre=debugcolor -E'say "pl" =~ /p.{1,6}/' Compiling REx "p.{1,6}" Final program: 1: EXACT
(3)
3: CURLY {1,6} (6)
5: REG_ANY (0)
6: END (0)
anchored "p" at 0 (checking anchored) minlen 2
Guessing start of match in sv for REx "p.{1,6}" against "pl"
Found anchored substr "p" at offset 0...
Guessed: match at offset 0
Matching REx "p.{1,6}" against "pl"
0 (3)
1 (3)
3: CURLY {2,6} (6)
5: REG_ANY (0)
6: END (0)
anchored "p" at 0 (checking anchored) minlen 3
Freeing REx: "p.{2,6}"