use strict;
use Getopt::Long;
-use Pod::Usage;
+# use Pod::Usage;
=head1 NAME
'dir=s',
'debug|d+','help|h|?','man|m');
-pod2usage() if $options{help};
-pod2usage({verbose=>2}) if $options{man};
+# pod2usage() if $options{help};
+# pod2usage({verbose=>2}) if $options{man};
$DEBUG = $options{debug};
push @USAGE_ERRORS,"Don't provide commands when you're asking for an interactive shell";
}
-pod2usage(join("\n",@USAGE_ERRORS)) if @USAGE_ERRORS;
+# pod2usage(join("\n",@USAGE_ERRORS)) if @USAGE_ERRORS;
+print STDERR join("\n",@USAGE_ERRORS) and exit 1 if @USAGE_ERRORS;
# OK. Generate the options to qsub which we'll be using
my @qsub_options = generate_qsub_options(\%options);