listing of foo.xml
------------------

  <foos>
    <foo>
      <a>I pity the foo</a>
      <b>foo bar</b>
      <c>foo cough</c>
      <d>baz bar foo</d>
    </foo>
    <foo>
      <a>...
      <b>...
      ...
    </foo>
    ... 
    ...
  </foos>


##</code><code>##


 (insertfile)foo.xml(/insertfile)   


##</code><code>##


in your perl subs module for this action
----------------------------------------

 $plugins = { 

     b => sub {

            my $data = uc($_[1]);

            "&lab;b&rab;$data&lab;/b&rab;" 
          },

     d => sub {

            my $data = uc($_[1]);

            "&lab;d&rab;$data&lab;/d&rab;"
          }

     };


##</code><code>##


  lab => sub { "&lab;$_[1]&rab;" }


##</code><code>##


 $plugins = { 

     b => sub {

            my $data = uc($_[1]);

            "<lab>b</lab>$data<lab>/b</lab>" 
          },

     d => sub {

            my $data = uc($_[1]);

            "<lab>d</lab>$data<lab>/d</lab>"
          }
     };


##</code><code>##


  (insertfile)foo.xml(/insertfile)


##</code><code>##


  <do_transform>
    (insertfile)foo.xml(/insertfile)
  </do_transform>


##</code><code>##


 $plugins = { 

    do_transform => sub { 

          my $data = $_[1];    #grab all the data

          $data =~ s@<b>(.*?)</b>@ do { my $uc = uc($1); "<b>$uc</b>" }@e;
          $data =~ s@<d>(.*?)</d>@ do { my $uc = uc($1); "<d>$uc</d>" }@e;

          return $data;        
         }
   };


##</code><code>##

 
 <foos>
 <db_select>
   <query> SELECT * FROM foo</query>
   <mask>
     <foo>
       <a><d>a</d></a>
       <b><d>b</d></b>
       <c><d>c</d></c>
       <d><d>d</d></d>  // oh dear...  

     ...
  ...


##</code><code>##


 <foos>
 <db_select delimiter="col">
   <query> SELECT * FROM foo</query>
   <mask>
     <foo>
       <a><col>a</col></a>
       <b><col>b</col></b>
       <c><col>c</col></c>
       <d><col>d</col></d>  // that's better :)
 
     ...
  ...

##</code><code>##


 $plugins = { 

       delete_all => sub {  $plugins = { 

                                          load => sub {...  },
                                     transform => sub {...  }

                                       };
                         }
 
      };


##</code><code>##


  (delete_all)(/delete_all)

  <transform>
    <load>foo.xml</load>
  </transform>