|
#1
12-07-2005, 12:16 PM
|
|||
|
|||
Perl script to modify HTML
I need a perl script to insert some text just after <body XXXX> open tag.
For Ex: <html><body bgcolor='#FFFFFF'></body></html> should result in <html><body bgcolor='#FFFFFF'>This is my text</body></html> Please note that the body open tag may differ at times. Please help me. 
|
|
#2
12-09-2005, 08:17 AM
|
|||
|
|||
you would want to do something like this
Code:
$string ~= s/<body(.*?)>/<body$1>new stuff/; You might need to do something like /i; if body might be capitalized. You might need to do /s; if the body tag might not be on the same line. I would not suggest doing /g; because that is for replace every occurance in the string and body should only be found once.
__________________
md
|
|
#4
12-12-2005, 07:36 AM
|
|||
|
|||
|
You are very welcome!
You might be interested in reading Useful Perl Scripts With Regular Expressions as it covers a lot of common tasks you would do with perl and regular expressions.
__________________
md
|
 |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Linear Mode
