--- gobook.perl	2014/09/28 04:29:18	3.1
+++ gobook.perl	2013/12/31 03:47:23	3.0
@@ -1,5 +1,4 @@
 #! /usr/bin/perl -w
-# $Id: gobook.perl,v 3.1 2014/09/28 04:29:18 philip Exp $
 use XML::Simple;
 use strict;
 use PostScript::Simple;
@@ -13,12 +12,11 @@ if ( defined $xml ){
     $strips = XMLin($xml, KeyAttr => {strip => 'id'});
 }
 
-# create a new PostScript object;
-
-my $p = new PostScript::Simple(papersize => "A5", 
-                                  colour => 1,
-                                     eps => 0,
-                                   units => "mm");
+# create a new PostScript object
+my $p = new PostScript::Simple(papersize => "A5",
+                          colour => 1,
+                          eps => 0,
+                          units => "mm",);
 
 # co-ords are horizontal, vertical. from bottom left corner. 148 x 210