There is something I'm not understanding about the search engine. With the code and data below I get the first substitution made but not the second, i.e., the </INSERT-TOPIC> is not substituted for </TOPIC>. When I print out the match it matches "<CASE-STUDY(
^>*)>". I thought the search engine started over at the beginning of the string and that the second match should be <CASE-STUDY.*?<\/CASE-STUDY><\/INSERT-TOPIC>. So I'm not misunderstood, of course I don't expect it to match the literal ".*?" and so forth but its equivalent data. Hope this makes sense.
if ($tmp_buffer =~ /^<CASE-STUDY/i) {
$tmp_buffer =~ /<CASE-STUDY[^>]*><TOPIC-INFO><TITLE>([^<]*)<\/TITLE
+>/i;
my($xtitle) = $1;
$tmp_buffer =~ s/<CASE-STUDY([^>]*)>/<TOPIC ID="" HEADING-LEVEL="1"
+><TOPIC-INFO><TITLE>$xtitle<\/TITLE><\/TOPIC-INFO><CASE-STUDY$1>/i;
$tmp_buffer =~ s/(<CASE-STUDY.*?<\/CASE-STUDY>)<\/INSERT-TOPIC>/$1<
+\/TOPIC>/si;
print "debug - $&\n";
}
<INSERT-TOPIC>
<CASE-STUDY ID="1"><TOPIC-INFO><TITLE>Case Study</TITLE></TOPIC-INFO>
<PARA>poop</PARA>
</CASE-STUDY>
</INSERT-TOPIC>
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.