anu p wrote: > > Hi, Hello,
> I have written a perl one liner that gets rid of > digits at the end of a word, but it also gets rid of > digits if they are at the beginning of a line. > The one liner is > > perl -ne 's/([a-z]\d+)/$1/g;' <filename> > > It doesn't work, but if I use it in a script it works. > > I want to know where am I going wrong. Also I want to > know how to not get rid of digits at the beginning of > a line but the ones that follow some chars This should do what you want: perl -pe's/(?<=[[:alpha:]])\d+//g' <filename> John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
