--- /tmp/.private/mike/hasher/chroot/usr/bin/publican.orig	2018-05-28 19:25:09.000000000 +0000
+++ /tmp/.private/mike/hasher/chroot/usr/bin/publican	2018-12-28 18:07:58.663874785 +0000
@@ -4,7 +4,8 @@
 use strict;
 use 5.008;
 use Carp;
-use Getopt::Long qw(:config no_auto_abbrev);
+#use Getopt::Long qw(:config no_auto_abbrev);
+use Getopt::Long qw(:config no_auto_abbrev debug);
 use Pod::Usage;
 use Publican;
 use Publican::CreateBook;
@@ -384,6 +385,11 @@
     }
 }
 
+	use Data::Dumper;
+	$Data::Dumper::Sortkeys=1;
+
+	utf8::encode $_ for @ARGV;
+
 GetOptions( \%opts, @optns, )
     or pod2usage(
     -verbose  => 1,
@@ -392,6 +398,9 @@
     -pathlist => \@pod_paths
     );
 
+    #warn Dumper \%INC;
+	warn Dumper \%opts, \@optns;
+
 # catch multiple actions
 if ( scalar @ARGV > 1 ) {
     croak(