xslt:如何删除缺少标记的逗号

<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
  <xsl:output method="xml" indent="yes" />

  <xsl:template match="/">
    <xsl:variable name="input" select="'This, is, a, test'" />
    <xsl:variable name="output">
      <xsl:call-template name="removeMissingCommas">
        <xsl:with-param name="input" select="$input" />
      </xsl:call-template>
    </xsl:variable>
    <result>
      <xsl:value-of select="$output" />
    </result>
  </xsl:template>

  <xsl:template name="removeMissingCommas">
    <xsl:param name="input" />
    <xsl:param name="output" select="''" />

    <xsl:choose>
      <xsl:when test="contains($input, ',,')">
        <xsl:call-template name="removeMissingCommas">
          <xsl:with-param name="input" select="concat(substring-before($input, ',,'), substring-after($input, ',,'))" />
          <xsl:with-param name="output" select="$output" />
        </xsl:call-template>
      </xsl:when>
      <xsl:otherwise>
        <xsl:value-of select="concat($output, $input)" />
      </xsl:otherwise>
    </xsl:choose>
  </xsl:template>
</xsl:stylesheet>