UNIX - Sub of two concecutive fields with adding 1

Question

Would you kindly help me to resolve the following?

20066898701..20066901700
20066891201..20066893700
20066879201..20066888700
20009429701..20009439700
20009412201..20009414700

I have an input as above

1. I need to convert the .. to , seperated

2. Then the column 2 will be subtracted from column 1 and output to be added with 1

20066898701..20066901700 => (20066901700-20066898701)+1 => 3000

Answer 1

Pipe your output into the following Perl:
perl -ne 'my @fields = split /\s/, $_; foreach my $input (@fields) { if (/^(\d+)..(\d+)$/) { print $2 - $1 + 1, "\n"; } }'

What this does is firstly split the input on spaces (so your first line should work). It then runs a regular expression on each entry to match a string which only contains two numbers separated by .. - the brackets put the numbers in $1 and $2.

For example: echo "20066898701..20066901700" | perl -ne 'my @fields = split /\s/, $_; foreach my $input (@fields) { if (/^(\d+)\.\.(\d+)$/) { print $2 - $1 + 1, "\n"; } }' 3000

Answer 2

sed 's/\.\./,/g'<erk|awk 'BEGIN { FS = ","}; { total = ($2 - $1) +1; print total}

Given a file named "erk", containing your data:

tom@holborn:~$  cat erk | sed 's/\.\./,/g'| awk 'BEGIN { FS = ","}; { total = ($2 - $1) +1; print total}'
3000
2500
9500
10000
2500

You could pipe the output of your application straight into sed, instead of cat

Answer 3

In Bash:

while IFS=. read -r field1 null field2
do
    echo $((field2 - field1 + 1))
done < inputfile

Answer 4

for i in 20066898701..20066901700 20066891201..20066893700 20066879201..20066888700 20009429701..20009439700 20009412201..20009414700
do
    echo $i | awk -F "[.]+" '{ printf("%s\n",$2-$1+1); }'
done
3000
2500
9500
10000
2500

If the values are in a single line as it seems now, you can use the simpler:

awk -F "[.]+" '{ printf("%s\n",$2-$1+1); }' filename

Answer 5

In bash:

cat file-with-numbers.txt | while read i
do
  first=`echo $i | cut -f1 -d.`
  second=`echo $i | cut -f3 -d.`
  expr $second - $first + 1
done

Answer 6

perl -pe 's/(\d+)\.\.(\d+)$/sprintf "%d,%d,%d",$1,$2,($2-$1)+1/eg;' filename

or

perl -pe 's/(\d+)\.\.(\d+)$/($2-$1)+1/eg;' filename  

if you only want the difference