diff --git a/cf/roken-h-process.pl b/cf/roken-h-process.pl index 153a35ce8..72d3bd37c 100644 --- a/cf/roken-h-process.pl +++ b/cf/roken-h-process.pl @@ -1,10 +1,10 @@ #!/usr/bin/perl -require 'getopts.pl'; +use Getopt::Std; my $debug = 0; -Getopts('dc:p:o:') || die "foo"; +getopts('dc:p:o:') || die "foo"; if ($opt_d) { $debug = 1;