Hi David,
OK, I get it now. Thank you for clarifying.
Rick
From: David Carlisle d(_dot_)p(_dot_)carlisle(_at_)gmail(_dot_)com
[mailto:xsl-list-service(_at_)lists(_dot_)mulberrytech(_dot_)com]
Sent: Friday, January 06, 2017 4:41 PM
To: xsl-list(_at_)lists(_dot_)mulberrytech(_dot_)com
Subject: Re: [xsl] Recursive string replace in XSLT 2.0
not here
<xsl:param name="regexes" as="element(regex)*">
Michael meant here, in the template definition
<xsl:param name="regex"/>
You could declare your top level initialiser to also be a sequence of elements
but then your initial call would have to be
<xsl:with-param name="regex" select="$regexes"/>
not
<xsl:with-param name="regex" select="$regexes/regex"/>
David
On 6 January 2017 at 21:37, Rick Quatro rick(_at_)rickquatro(_dot_)com
<xsl-list-service(_at_)lists(_dot_)mulberrytech(_dot_)com> wrote:
Thank you Michael. Oddly enough, when I add the as="element(regex)*" the
finds/changes fail. Here is the entire stylesheet:
<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform";
xmlns:xs="http://www.w3.org/2001/XMLSchema";
exclude-result-prefixes="xs"
version="2.0">
<xsl:output indent="yes"/>
<xsl:param name="regexes" as="element(regex)*">
<regex><find>"(\S)</find><change>“$1</change></regex>
<regex><find>(\S)"</find><change>$1”</change></regex>
</xsl:param>
<xsl:template match="/">
<xsl:apply-templates/>
</xsl:template>
<xsl:template match="p">
<p><xsl:apply-templates/></p>
</xsl:template>
<xsl:template match="text()[string-length(normalize-space(.))>0]">
<xsl:call-template name="applyRegexes">
<xsl:with-param name="nodeText" select="."/>
<xsl:with-param name="regex" select="$regexes/regex"/>
</xsl:call-template>
</xsl:template>
<xsl:template name="applyRegexes">
<xsl:param name="nodeText"/>
<xsl:param name="regex"/>
<xsl:choose>
<xsl:when test="$regex">
<xsl:variable name="temp">
<xsl:value-of
select="replace($nodeText,$regex[1]/find,$regex[1]/change)"/>
</xsl:variable>
<xsl:call-template name="applyRegexes">
<xsl:with-param name="nodeText" select="$temp"/>
<xsl:with-param name="regex"
select="$regex[position()>1]"/>
</xsl:call-template>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="$nodeText"/>
</xsl:otherwise>
</xsl:choose>
</xsl:template>
</xsl:stylesheet>
Here is my input:
<?xml version='1.0' encoding='UTF-8'?>
<root>
<test><p class="Note">"Abcdefghij."</p></test>
<test><p class="Note">"defghij."</p></test>
</root>
Without the as attribute, the finds/changes are applied, but with it, they
don't. Thanks.
--Rick
-----Original Message-----
From: Michael Kay mike(_at_)saxonica(_dot_)com
[mailto:xsl-list-service(_at_)lists(_dot_)mulberrytech(_dot_)com]
Sent: Friday, January 06, 2017 4:25 PM
To: xsl-list(_at_)lists(_dot_)mulberrytech(_dot_)com
Subject: Re: [xsl] Recursive string replace in XSLT 2.0
If you don't like head-tail recursion for this kind of problem, there are a
couple of alternatives you might consider.
One is xsl:iterate, which looks something like this:
<xsl:iterate select="$list-of-replacements">
<xsl:param name="str" as="xs:string"/>
<xsl:on-completion select="$str"/>
<xsl:next-iteration>
<xsl:with-param name="str" select="replace($str, find, change)"/>
</xsl:next-iteration>
</xsl:iterate>
The other is fold-left:
fold-left($list-of-replacements, $str, function($str, $regex) {
replace($str, $regex/find, $regex/change) } )
Both these require 3.0.
Michael Kay
Saxonica
On 6 Jan 2017, at 19:41, David Carlisle
d(_dot_)p(_dot_)carlisle(_at_)gmail(_dot_)com
<xsl-list-service(_at_)lists(_dot_)mulberrytech(_dot_)com> wrote:
I'd have written it as a function rather than template, but the main
issue is you want your parameter to be (always) a sequence of elements
not sometimes a sequence of elements and sometimes a document node
with a sequence of child elements.
<?xml version="1.0" encoding="UTF-8"?> <xsl:stylesheet
xmlns:xsl="http://www.w3.org/1999/XSL/Transform";
xmlns:xs="http://www.w3.org/2001/XMLSchema";
exclude-result-prefixes="xs"
version="2.0">
<xsl:output indent="yes"/>
<xsl:param name="regexes">
<regex><find>a</find><change>x</change></regex>
<regex><find>b</find><change>y</change></regex>
<regex><find>c</find><change>z</change></regex>
</xsl:param>
<xsl:template match="/">
<xsl:apply-templates/>
</xsl:template>
<xsl:template match="p">
<p><xsl:apply-templates/></p>
</xsl:template>
<xsl:template match="text()"><!--[string-length(.)>0]-->
<xsl:message select="."></xsl:message>
<xsl:call-template name="applyRegexes">
<xsl:with-param name="nodeText" select="."/>
<xsl:with-param name="regex" select="$regexes/regex"/>
</xsl:call-template>
</xsl:template>
<xsl:template name="applyRegexes">
<xsl:param name="nodeText"/>
<xsl:param name="regex"/>
<xsl:message select="$regex"></xsl:message>
<xsl:message select="$regex[1]"/>
<xsl:message select="$regex[position()>1]"/>
<xsl:choose>
<xsl:when test="$regex">
<xsl:call-template name="applyRegexes">
<xsl:with-param name="nodeText"
select="replace($nodeText,$regex[1]/find,$regex[1]/change)"/>
<xsl:with-param name="regex"
select="$regex[position()>1]"/>
</xsl:call-template>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="$nodeText"/>
</xsl:otherwise>
</xsl:choose>
</xsl:template>
</xsl:stylesheet>
XSL-List info and archive <http://www.mulberrytech.com/xsl/xsl-list>
EasyUnsubscribe <-list/612310> (by email <> )
--~----------------------------------------------------------------
XSL-List info and archive: http://www.mulberrytech.com/xsl/xsl-list
EasyUnsubscribe: http://lists.mulberrytech.com/unsub/xsl-list/1167547
or by email: xsl-list-unsub(_at_)lists(_dot_)mulberrytech(_dot_)com
--~--