Below is an XSLT solution to my swapping problem. It was quite interesting that it took the XSLT engine I was using (MSXML4.0) over 21 seconds to generate an output file on my 3MB input (45K+ XML nodes). The Perl program I posted last week generated an output file in a couple of seconds.

<xsl:stylesheet version="1.0"  xmlns:xsl="http://www.w3.org/1999/XSL/T
+ransform">
<!-- 12/01/2005 jkulas@lsijax.com -->
    <!-- This transforms figure by moving title to last_child position
+ -->
    <!-- Functionally similar to twig_roots -->
    <xsl:template match ="figure">
        <xsl:element name="figure">
            <xsl:copy-of select="@*"/>
            <xsl:apply-templates/>
            <!-- Add the title node as last child-->
            <xsl:if test="title">
                <xsl:element name ="title">
                    <xsl:copy-of select="title/@*"/>
                    <xsl:copy-of select="title/text()"/>
                </xsl:element>
            </xsl:if>
        </xsl:element>
    </xsl:template>

    <!-- Ignore any figure/title's since they are handled in the figur
+e template-->
    <xsl:template match ="figure/title">
    </xsl:template>

    <!-- Copy all nodes, except figure nodes (of course)-->
    <!-- Adapted from Michael Kay, _XSLT 2.0_, 3/e, p. 243-->
    <!-- Functionally similar to twig_print_outside_roots -->
    <xsl:template match ="@* | node()">
        <xsl:copy> 
            <xsl:copy-of select="@*"/>
            <xsl:apply-templates/>
        </xsl:copy>
    </xsl:template>

</xsl:stylesheet>
[download]

Peace,
--Jack