X-Git-Url: http://git.shiar.nl/barcat.git/blobdiff_plain/2635f0b521e899b3f1b81dcd72ebfb33cf1b930b..4644846ee87e7e9eaa30ec40d679d0e02afd8d14:/graph diff --git a/graph b/graph index cdcb80c..ab51d08 100755 --- a/graph +++ b/graph @@ -8,7 +8,10 @@ use open qw( :std :utf8 ); our $VERSION = '1.02'; use Getopt::Long '2.33', qw( :config gnu_getopt ); -sub podexit { require Pod::Usage; Pod::Usage::pod2usage(-exitval => 0, @_) } +sub podexit { + require Pod::Usage; + Pod::Usage::pod2usage(-exitval => 0, -perldocopt => '-oman', @_); +} GetOptions(\my %opt, 'color|c!', 'follow|f:i',