Re: [xsl] I desire this function: substring-before(string, regex charset)

["Martin Honnen martin.honnen@xxxxxx" <xsl-list-service@xxxxxxxxxxxxxxxxxxxxxx>]

Am 13.04.2025 um 15:03 schrieb G. Ken Holman g.ken.holman@xxxxxxxxx:
> And, of course, the second function would just move the character
> class into the non-greedy search:
>
> B  replace('THEN THE CURTAIN','(^.*?[AEIOU]).*$','$1')
>
> ... returns "THE".

Or solely with a recursive function

<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform";
B  version="3.0"
B  xmlns:xs="http://www.w3.org/2001/XMLSchema";
B  xmlns:mf="http://example.com/mf";
B  exclude-result-prefixes="#all">

B  <xsl:param name="input" as="xs:string">THEN THE CURTAIN FELL</xsl:param>

B  <xsl:output method="text" item-separator="&#10;"/>

B  <xsl:function name="mf:extract" as="xs:string*">
B B B  <xsl:param name="input" as="xs:string"/>
B B B  <xsl:variable name="match"
select="replace($input,'(^.*?[AEIOU]).*$','$1')"/>
B B B  <xsl:sequence
B B B B B  select="if ($input)
B B B B B B B B B B B B B  then ($input, mf:extract(substring-after($input,
$match)))
B B B B B B B B B B B B B  else ()"/>
B  </xsl:function>

B  <xsl:template match="/" name="xsl:initial-template">
B B B  <xsl:sequence select="mf:extract($input)"/>
B  </xsl:template>

</xsl:stylesheet>