> > This should do what you want: > > perl -pe's/(?<=[[:alpha:]])\d+//g' <filename>
As per required ouput your one-line is showing to me as, # perl -pe 's/(?<=[[:alpha:]])\d+//g' test.log This23 is a 45 good thing # try this one. # perl -pe 's/\d+//g if /^\D+/;' test.log This is a 45 good thing -Muthu -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>