Re^2: Replacing 3 and 4 digit numbers.

    $text =~ s{ $url (*SKIP) (*FAIL) | ($digits_3_4) }
[download]

wow! perlre is defintively an unxplored (by me) continent! thanks AnomalousMonk

There are no rules, there are no thumbs..
Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.

Comment on Re^2: Replacing 3 and 4 digit numbers. Download Code

Replies are listed 'Best First'.
Re^3: Replacing 3 and 4 digit numbers. by Anonymous Monk on Apr 08, 2016 at 08:51 UTC
:D "old style" that is backwards compatible `s{ (...) \| (...) \| ... }{ RepReplace($1,$2,$3); }ge; sub RepReplace { my( $link, $dig3, $num4 ) = @_; if( defined $link ){ return $link; ### change nothing } ...` [download]	[reply] [d/l]