$ perl -e " use re 'debug'; $c='a'; $min=3; m/$c\{$min,}/; "
Compiling REx "a\{3,}"
Final program:
   1: EXACT <a{3,}> (4)
   4: END (0)
anchored "a{3,}" at 0 (checking anchored isall) minlen 5
Freeing REx: "a\{3,}"
[download]