![]() |
|
Perl: the Markov chain saw | |
PerlMonks |
Re: need regular expressionby tilly (Archbishop) |
on Nov 02, 2005 at 08:08 UTC ( #504861=note: print w/replies, xml ) | Need Help?? |
Untested.
s/(\d?\d)(-\d?\d-\d?\d)/(2000+$1).$2/eg
In Section
Seekers of Perl Wisdom
|
|