<xsl:template name="tokenize">
  <xsl:param name="string"/>
     <xsl:param name="token"/> <!-- one token:( -->
        <xsl:choose>
           <xsl:when test="contains($string, $token)">
               <token><xsl:value-of select="substring-before($string, $token)"/></token>
	 <xsl:call-template name="tokenize"> <!-- recursion! -->
	    <xsl:with-param name="string" select="substring-after($string, $token)"/>
	    <xsl:with-param name="token" select="$token"/>
	 </xsl:call-template>
           </xsl:when>
           <xsl:otherwise>
              <token><xsl:value-of select="$string"/></token>
          </xsl:otherwise>
      </xsl:choose>
</xsl:template>

<xsl:variable name="tokens">
    <xsl:call-template name="tokenize">
        <xsl:with-param name="string" select="$param"/>
        <xsl:with-param name="token">,</xsl:param>
    </xsl:call-template>
</xsl:variable>
<xsl:for-each select="$tokens/token"> 
    <xsl:value-of select="."/> <!-- nu naprimer; -->
</xsl:for-each>