#! /bin/sh
if [ "$1" != "" ]; then PROG=$1 ; else PROG="xdvi -geometry +250+0" ; fi
perl -pe '$slide=0 if /\\end\{slide\}/;
          push @slide, $_ if $slide;
          @slide=(), $slide=1 if /\\begin\{slide\}/;
          print($_, @slide, "\n\\it\n"), $_="" if /\\begin\{note\}/;' \
  < ./slides.tex > /tmp/slides.tex
cd /tmp
latex2e slides.tex
$PROG slides.dvi
rm slides.*