Yet another UN*X shell.

#!/bin/ksh
# Korn shell version of 99 Bottles
# Dave Plonka - plonka@carroll1.cc.edu

typeset -i n=99
typeset bottles=bottles
typeset no

while (( n ))
do
   print "${n?} ${bottles?} of beer on the wall,"
   print "${n?} ${bottles?} of beer,\ntake one down, pass it around,"
   n=n-1
   case ${n?} in
   0)
      no=no
      bottles=${bottles%s}s
      ;;
   1)
      bottles=${bottles%s}
      ;;
   esac
   print "${no:-${n}} ${bottles?} of beer on the wall.\n"
done

exit