wip export

[quacks.git] / pumpkin-books.ps.pl

diff --git a/pumpkin-books.ps.pl b/pumpkin-books.ps.pl
index 78e59a01359a10f2d33b9d39abc58699da36083c..89a78af26f4969b56f94215c0782abf00e6f0ad1 100755 (executable)
--- a/pumpkin-books.ps.pl
+++ b/pumpkin-books.ps.pl
@@ -5,15 +5,8 @@
 
 use strict;
 
-my $pumpkin = ["255/185/15", "0 0 0"];
-my $green   = ["0/238/118", "1 1 1"];
-my $red     = ["1   0  0", "0 0 0"];
-my $blue    = ["0  .4 1 ", "1 1 1"];
-my $yellow  = ["1  1   0", "0 0 0"];
-my $moth    = [" 0  0  0", "1 1 1"];
-my $purple  = ["145/44/238", "0 0 0"];
-my $lotus   = [("0/245/255",) x 2];
-my $white   = ["1  1   1", "0 0 0"];
+BEGIN { unshift @INC, '.'; }
+use Quacks;
 
 my $anychip = ['0.8', '0'];