$ perl -Mre=debug -e " /larry.wall+!/ " Compiling REx "larry.wall+!" Final program: 1: EXACT (4) 4: REG_ANY (5) 5: EXACT (7) 7: PLUS (10) 8: EXACT (0) 10: EXACT (12) 12: END (0) anchored "larry" at 0 floating "l!" at 9..2147483647 (checking anchored) minlen 11 Freeing REx: "larry.wall+!"