Use Getopt::Std instead of getopts.pl , which has been removed from Perl since v5.16