Welcome to WebmasterWorld Guest from 54.196.238.210

Forum Moderators: coopster & jatar k & phranque

Message Too Old, No Replies

Help with Perl Script

Advanced Find/Replace CGI Application

     

CustomFit

2:39 am on Jan 12, 2004 (gmt 0)

10+ Year Member



Does anyone have quick pointers on how to write a small Perl script to run on a linux server that'll address some advanced find & replace functions inside document(s) source code?

Here is what I'm trying to do. We'll call the Perl cgi script "engine" in this explanation.

If engine finds a file name ending in *.asp (inside the HTML source code, of course), the engine will rewrite it as *.aspex.

In addition, when engine finds a file name ending in *.asp, it will also adding a predefined line of code ("/newdir/") inside the HTML source code, provided they're all inside an anchor.

Another way to visualize the concept:

Current:

<a href="/index.asp">Link</a>

New:

<a href="/newdir/index.aspex">Dir Link</a>

Thanks in advance!

IanKelley

9:05 am on Jan 12, 2004 (gmt 0)

WebmasterWorld Senior Member 10+ Year Member



Look into regular expressions, you'll find endless info if you do a search.

SeanW

1:49 pm on Jan 12, 2004 (gmt 0)

10+ Year Member



OTTOMH (untested):

perl -p -i.bak -e 's/(href=\")(.*?asp)\"/$1\/newdir$2ex\"/g' *.asp

Then rename the files yourself (assuming you're using Windows, I think ren *.asp *.aspex will do it.

Sean

 

Featured Threads

Hot Threads This Week

Hot Threads This Month