SPUG: replace a text to other inside a file

Ivan Heffner ivandh at comcast.net
Tue Dec 28 02:14:04 CST 2004


Except Perl will treat the unescaped '.'s in the first half of the regex as 
"any single character" which probably is not quite what you want.  Try

perl -pi -e 's[\.{2}/(\w+)\.txt][../../$1]g' some_file.txt

Ivan

At 12/27/2004 11:53 PM, Umar Cheema wrote:
>Oops, just noticed that you also had another directory level added to the
>replaced pattern. You can try this simple regex:
>
>perl -pi.bak -e 's/..\/(\w+).txt$/..\/..\/$1/g' some_file.txt
>
>
>
>On Mon, 27 Dec 2004, Umar Cheema wrote:
>
> > I usually take care of these things by running a perl regex on the command
> > line:
> >
> > $ perl -pi.bak -e 's/\.txt$//g' some_file.txt
> >
> > where 'some_file.txt' is your file that contains some text. You can
> > modify the regex to match your requirements and/or file's content
> > structure (this regex will not work if you expect to have multiple .txt
> > patterns on the same line or if .txt is not the last thing on the line, 
> etc).
> > You can also pass in *.txt as an argument to replace your text in multiple
> > files.
> >
> > The .bak will create backups of your original file (some_file.txt.bak)
> > incase you make a mistake. You can leave the .bak part out if you're a
> > confident and fearless man who laughs at the word 'mistake'.
> >
> >
> > Umar
> >
> >
> > On Tue, 28 Dec 2004, Sachin Chaturvedi wrote:
> >
> > > i want to change some text inside file to other using perl
> > > for example
> > >
> > > file contains
> > >
> > > source ../setextreme.txt
> > >
> > > and i want to change it to
> > >
> > > source ../../setextreme
> > >
> > > can u tell me if i can do using perl script.
> > >
> > > i am not getting much help from text book
> > > _____________________________________________________________
> > > Seattle Perl Users Group Mailing List
> > >      POST TO: spug-list at mail.pm.org
> > > SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
> > >     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
> > >     WEB PAGE: http://seattleperl.org/
> > >
> >
> >
> >
> >
>
>
>
>_____________________________________________________________
>Seattle Perl Users Group Mailing List
>      POST TO: spug-list at mail.pm.org
>SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
>     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
>     WEB PAGE: http://seattleperl.org/



More information about the spug-list mailing list