#!/bin/bash
DIR=/tmp
if [ -z $DBI_DSN ]; then
echo Warning: DBI_DSN not set for scripts/dbi.schema.pl.
fi
perl -Ilib scripts/Heawood.pl png > $DIR/Heawood.log
perl -Ilib scripts/anonymous.pl png > $DIR/anonymous.log
perl -Ilib scripts/circo.pl png > $DIR/circo.log
perl -Ilib scripts/cluster.pl png > $DIR/cluster.log
perl -Ilib scripts/dbi.schema.pl png > $DIR/dbi.schema.log
perl -Ilib scripts/dependency.pl png > $DIR/dependency.log
perl -Ilib scripts/html.labels.1.pl png > $DIR/html.labels.1.log
perl -Ilib scripts/html.labels.2.pl png > $DIR/html.labels.2.log
perl -Ilib scripts/jointed.edges.pl png > $DIR/jointed.edges.log
perl -Ilib scripts/macro.1.pl png > $DIR/macro.1.log
perl -Ilib scripts/macro.2.pl png > $DIR/macro.2.log
perl -Ilib scripts/macro.3.pl png > $DIR/macro.3.log
perl -Ilib scripts/macro.4.pl png > $DIR/macro.4.log
perl -Ilib scripts/macro.5.pl png > $DIR/macro.5.log
perl -Ilib scripts/parse.data.pl png > $DIR/parse.data.log
perl -Ilib scripts/parse.html.pl png > $DIR/parse.html.log
perl -Ilib scripts/parse.isa.pl png > $DIR/parse.isa.log
perl -Ilib scripts/parse.recdescent.pl png > $DIR/parse.recdescent.log
perl -Ilib scripts/parse.regexp.pl png > $DIR/parse.regexp.log
perl -Ilib scripts/parse.stt.pl png > $DIR/parse.stt.log
perl -Ilib scripts/parse.xml.bare.pl png > $DIR/parse.xml.bare.log
perl -Ilib scripts/parse.xml.pp.pl png > $DIR/parse.xml.pp.log
perl -Ilib scripts/parse.yacc.pl png > $DIR/parse.yacc.log
perl -Ilib scripts/parse.yapp.pl png > $DIR/parse.yapp.log
perl -Ilib scripts/plaintext.pl png > $DIR/plaintext.log
perl -Ilib scripts/quote.pl png > $DIR/quote.log
perl -Ilib scripts/rank.sub.graph.1.pl png > $DIR/rank.sub.graph.1.log
perl -Ilib scripts/rank.sub.graph.2.pl png > $DIR/rank.sub.graph.2.log
perl -Ilib scripts/rank.sub.graph.3.pl png > $DIR/rank.sub.graph.3.log
perl -Ilib scripts/rank.sub.graph.4.pl png > $DIR/rank.sub.graph.4.log
perl -Ilib scripts/record.1.pl png > $DIR/record.1.log
perl -Ilib scripts/record.2.pl png > $DIR/record.2.log
perl -Ilib scripts/record.3.pl png > $DIR/record.3.log
perl -Ilib scripts/record.4.pl png > $DIR/record.4.log
perl -Ilib scripts/sub.graph.pl png > $DIR/sub.graph.log
perl -Ilib scripts/sub.graph.frames.pl png > $DIR/sub.graph.frames.log
perl -Ilib scripts/sub.sub.graph.pl png > $DIR/sub.sub.graph.log
perl -Ilib scripts/trivial.pl png > $DIR/trivial.log
perl -Ilib scripts/unnamed.sub.graph.pl png > $DIR/unnamed.sub.graph.log
perl -Ilib scripts/utf8.1.pl png > $DIR/utf8.1.log
perl -Ilib scripts/utf8.2.pl png > $DIR/utf8.2.log
perl -Ilib scripts/generate.demo.pl png
# $DR is my web server's doc root.
PM=Perl-modules/html/graphviz2
cp html/* $DR/$PM
cp html/* ~/savage.net.au/$PM
echo Check the version number in the demo index