Listing 4: Nachbearbeitung der WMl-Dateien

#!/bin/sh
Pfad=/pfad/zu/einem/wml/verzeichnis
for i in wml/*
do
  /usr/local/bin/sed -f w.sedscript $i | utf2ae > $Pfad/$i \
  && echo " - transferred $i"
done

Listing 5: MIME-Typen

text/vnd.wap.wml                wml
application/vnd.wap.wmlc        wmlc
text/vnd.wap.wmlscript          wmls
application/vnd.wap.wmlscriptc  wmlsc

Listing 6: Übersichts-Templates

<!-- .................Produktgruppen..............  -->
<xsl:template match="appsrv|bluet|datam|intzu|java|
              linux|pki|san|sysm|unis|viren|wap|wbt">
  <xsl:variable name="thisandnow">
    <xsl:value-of select="@thema"/>
  </xsl:variable>
<!-- Ausgabe der Firmenliste (kurz) -->
  <saxon:output file="{$dir}{$filesep}{$thisandnow}.wml"
    method="xml" indent="yes"
    doctype-public="-//WAPFORUM//DTD WML 1.1//EN"
    doctype-system=
            "http://www.wapforum.org/DTD/wml_1.1.xml">
  <wml>
     <card>
        <xsl:attribute name="id">
         <xsl:value-of select="@thema"/>
        </xsl:attribute>
        <xsl:attribute name="title">
          <xsl:value-of select="@longname"/>
        </xsl:attribute>
        <xsl:apply-templates select="group" 
             mode="complist"/>
     </card>
  </wml>
  </saxon:output>
  <xsl:apply-templates select="group" mode="detail"/>
</xsl:template>
<!-- .............Liste der Firmen.............. -->
<xsl:template match="group" mode="complist">
      <xsl:apply-templates select="firma" mode="pur"/>
</xsl:template>
<xsl:template match="group" mode="detail">
  <saxon:set-attribute name="diesthema" select="@thema"/>
  <saxon:set-attribute name="diesenummer" 
         select="position()"/>
  <xsl:variable name="thisandnow">
    <xsl:value-of select="@diesthema"/>
  </xsl:variable>
  <xsl:variable name="grpno">
    <xsl:value-of select="@diesenummer"/>
  </xsl:variable>
<!-- Ausgabe der Übersicht zu einer Produktgruppe -->
  <saxon:output     file="{$dir}{$filesep}{$thisandnow}{$grpno}.wml"
    method="xml" indent="yes"
    doctype-public="-//WAPFORUM//DTD WML 1.1//EN"
    doctype-system=
            "http://www.wapforum.org/DTD/wml_1.1.xml">
  <wml>
    <xsl:apply-templates select="firma" mode="longish"/>
  </wml>
  </saxon:output>
</xsl:template>
<!-- Firmennamen in Kurzform-->
<xsl:template match="firma" mode="pur">
  <xsl:variable name="compno">
    <xsl:number count="firma"/>
  </xsl:variable>
  <a>
    <xsl:attribute name="href">
      <xsl:value-of select="$currentgroup"/>
      <xsl:value-of select="ancestor::group/@which"/>
      <xsl:text>.wml#</xsl:text>
      <xsl:value-of select="$currentgroup"/>
      <xsl:number value="$compno"/>
    </xsl:attribute>
    <xsl:apply-templates select="name"/>
   </a>
   <xsl:if test="not(position()=last())">     <br/>   
</xsl:if>
</xsl:template>