43:1:1; 43:1:2; 43:1:3; 43:1:4; 43:1:5; 43:1:6; 27:3:7; 27:3:8; 27:3:9; 65:1:4; 65:1:18

##</code><code>##

43:1:1-5; 27:3:7-9; 65:1:4; 65:1:18

##</code><code>##

    $seq =~ s/
        (\d+):(\d+):(\d+)

        (?:;|\s)*

        (\1):(\2):(?{1+($3|$6)})

        /$1:$2:$3-$6/xg;

##</code><code>##

#OUTPUT
43:1:1-2; 43:1:3-4; 43:1:5-6; 27:3:7-8; 27:3:9; 65:1:4-18