use Getopt::Long;

my $days = 30;
GetOptions( 'days=i', \$days );
print $days, "\n";