git-svn-id: https://projectaon.org/data/trunk@231 f6f3e2d7-ff33-0410-aaf5-b4bee2cdac11

[project-aon.git] / scripts / gbtoxhtml-all.pl

diff --git a/scripts/gbtoxhtml-all.pl b/scripts/gbtoxhtml-all.pl
deleted file mode 100755 (executable)
index ebb11f4..0000000
--- a/scripts/gbtoxhtml-all.pl
+++ /dev/null
@@ -1,17 +0,0 @@
-#!/usr/bin/perl -w
-
-use strict;
-
-my $gbtoxhtml = "$ENV{AONPATH}/bin/gbtoxhtml.pl";
-my @bookCodes = qw{ 01fftd  02fotw  03tcok  04tcod
-                    05sots  06tkot  07cd    08tjoh
-                    09tcof  10tdot  11tpot  12tmod
-                    13tplor 14tcok  15tdc
-                    01gstw  02tfc   03btng
-                    rh
-                };
-
-foreach my $bookCode (@bookCodes) {
-    print "\n" . ('~' x 10) . " $bookCode " . ('~' x 10) . "\n\n";
-    print qx{$gbtoxhtml $bookCode};
-}