my $start = $1; $start--; #increment down for substr my $end = $2; $end--; #increment down for substr