screp --version|--help

Simple version and usage options for screp tool.
Also allow single-char options bundled (i.e. -va for -v -a).

diff --git a/screp b/screp
index dbd264c22916e8e239f22cf86b6fe462bfc053cf..edf643e8a57a8e4011f67c44a9c6c0c35634e443 100755 (executable)
--- a/screp
+++ b/screp
@@ -3,10 +3,12 @@ use strict;
 use warnings;
 use Data::Dumper;
 
+our $VERSION = '1.00';
+
 my $SHOWWARN = 0;
 my $APMSVG = undef;
 
-use Getopt::Long;
+use Getopt::Long qw(:config bundling auto_version auto_help);
 GetOptions(
        "verbose|v!" => \$SHOWWARN,
        "apm|a=s" => \$APMSVG,
@@ -615,3 +617,25 @@ if ($APMSVG) {
        print $apmfile $svg;
 }
 
+__END__
+
+=head1 NAME
+
+screp - StarCraft replay parser
+
+=head1 SYNOPSIS
+
+screp [options] < [replay data]
+
+ Options:
+   --verbose
+   --apm
+
+=head1 OPTIONS
+
+=head1 AUTHOR
+
+Mischa POSLAWSKY <perl@shiar.org>
+
+=head1 STUFF
+