Oh, and one more thing (so much for my final word in the thread)...
I'm sure you must be, but it occurred to me to ask if you were aware that qr// effectively wraps its object in a (?mo-ds:...) ((?^mods:...) from 5.14 onward) non-capturing group? So your preferred usage ends up looking like:
c:\@Work\Perl\monks>perl -wMstrict -le "my $rx = qr{(?x: pattern)}; print qq{perl version $]: $rx}; " perl version 5.008009: (?-xism:(?x: pattern)) perl version 5.014004: (?^:(?x: pattern))
Give a man a fish: <%-{-{-{-<
In reply to Re^7: Recognizing 3 and 4 digit number
by AnomalousMonk
in thread Recognizing 3 and 4 digit number
by htmanning
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |