--- pskgen/pskgen.in.orig	2005-09-15 23:52:20.000000000 -0700
+++ pskgen/pskgen.in	2012-10-19 22:21:12.364329713 -0700
@@ -59,8 +59,13 @@
 	exit 0;
 }
 
-require 'getopts.pl';
-do Getopts('rs:o:di:he:d');
+if ($] > 5.014002) {
+	use Getopt::Std;
+	getopts('rs:o:di:he:d');
+} else {
+	require 'getopts.pl';
+	do Getopts('rs:o:di:he:d');
+}
 $output = '-';
 $output = $opt_o if ($opt_o);