% perl -cw -Mre=debug -e 'm/^Subject: (.*)/' Compiling REx `^Subject: (.*)' rarest char j at 3 1: BOL(2) 2: EXACT (6) 12: END(0) anchored `Subject: ' at 0 (checking anchored) anchored(BOL) minlen 9 Omitting $` $& $' support. ----------------------------------------------------------------------------- Copyright 1997-2024 Jeffrey Friedl