Re: [xsl] 99 bottles of beer

["Andrew Welch" <andrew.j.welch@xxxxxxxxx>]

On 2/5/07, Abel Braaksma <abel.online@xxxxxxxxx> wrote:
> Andrew Welch wrote:
> > After seeing M. David's post about the bottles of beer problem, I
> > thought about how to solve this problem using XSLT 2.0.  Here's what
> > came to mind first:
>
> Hi Andrew,
>
> let me try what came to mind second ;)
> Here's my go on it in a single XPath statement. A bit less well-suited
> for educational purposes. It shows nested for-loops in XPath, casting,
> use of sequences+separator and some ways how not to code (it is exactly
> an example of good programming practice ;)
>
> <xsl:stylesheet version="2.0"
>     xmlns:xsl="http://www.w3.org/1999/XSL/Transform";
>     xmlns:xs="http://www.w3.org/2001/XMLSchema";>
>
>     <xsl:output method="text" />
>     <xsl:template match="/" name="main">
>         <xsl:value-of select="
>             for $i in reverse(1 to 99)
>             return for $j in
>                 (' on the wall.',
>                 '.&#10;Take one down, pass it around',
>                 ' on the wall.&#10;' )
>
>                 return concat
>                     ($i - xs:integer(ends-with($j, '&#10;')),
>                     ' bottle', if ($i = 1) then '' else 's',
>                     ' of beer', $j)
>         " separator="&#10;"/>
>
>     </xsl:template>
> </xsl:stylesheet>

Nice! However a couple of small problems:

2 bottles of beer on the wall.
2 bottles of beer.
Take one down, pass it around
1 bottles of beer on the wall.
     ^^^^^^^

1 bottle of beer on the wall.
1 bottle of beer.
Take one down, pass it around
0 bottle of beer on the wall.
      ^^^^^^^^

You just need to modify it slightly:

<xsl:value-of select="for $i in reverse(1 to 3), $j in
              (' on the wall.',
              '.&#10;Take one down, pass it around',
              ' on the wall.&#10;' )

              return concat
                  ($i - xs:integer(ends-with($j, '&#10;')),
                  ' bottle', if ($i - xs:integer(ends-with($j,
'&#10;')) = 1) then '' else 's',
                  ' of beer', $j)"

separator="&#10;"/>

which gives:

2 bottles of beer on the wall.
2 bottles of beer.
Take one down, pass it around
1 bottle of beer on the wall.

1 bottle of beer on the wall.
1 bottle of beer.
Take one down, pass it around
0 bottles of beer on the wall.

cheers
andrew