Select Code to Download

use strict;
use warnings;
...
my $value = shift;

print ' result = ', $value + $opt{offset}, "\n";

$ add.pl 5
 result = 8
...
 result = -2
$ add.pl +offset -2 12
 result = 10