...
my $plotlength = 10;
my $calclength = 20;
...

GetOptions
(
    ...
    'plotlength=i' => \$plotlength,
    'calclength=i' => \$calclength,
    ...

) or die "Error in command line arguments\n";