Blob Blame Raw
--- /pskgen/pskgen.in	2014-02-19 12:57:34.000000000 +0100
+++ /pskgen/pskgen.in	2014-03-08 11:00:10.215965859 +0100
@@ -59,8 +59,9 @@ 
 	exit 0;
 }
 
-require 'getopts.pl';
-do Getopts('rs:o:di:he:d');
+use Getopt::Std;
+
+getopts('rs:o:di:he:d') or exit 1;
 $output = '-';
 $output = $opt_o if ($opt_o);