use Getopt::Std;
use strict;

my $opt_i;
getopt('i');

print "Increment value is $opt_i\n";