1) sequence_history/buckets/FPJ.INV_DOM_16_PRD.47269.2644?startid=2644000&endid=2644666

2) sequence_history/buckets/FPJ.INV_DOM_16_PRD.41987.9616

my $string='/sequence_history/buckets/FPJ.INV_DOM_16_PRD.47269.2644?startid=2644000&endid=2644666';

if ($string =~ /sequence_history/buckets/(.*)/){
    my $line = $1;
    print "$linen";
    if($line =~ /(FPJ.*PRD).(d*)./){
        my $topic_type_string = $1;
        my $topic_id = $2;
        print "$1n$2n";

    }
if($string =~ /(?(?=endid=)d*$)/){
    # how to print match pattern here?
    print "matchn";
}