Help for this page

Select Code to Download


  1. or download this
    if ($tmp_buffer =~ /^<CASE-STUDY/i) {        
   $tmp_buffer =~ /<CASE-STUDY[^>]*><TOPIC-INFO><TITLE>([^<]*)<\/TITLE
+>/i;
...
   $tmp_buffer =~ s/(<CASE-STUDY.*?<\/CASE-STUDY>)<\/INSERT-TOPIC>/$1<
+\/TOPIC>/si;
   print "debug - $&\n";
}
  2. or download this
    <INSERT-TOPIC>
<CASE-STUDY ID="1"><TOPIC-INFO><TITLE>Case Study</TITLE></TOPIC-INFO>
<PARA>poop</PARA>
</CASE-STUDY>
</INSERT-TOPIC>