all matches of a regex

[Öznur Taştan]

Hi,
I have been trying to solve a problem which is about to drive me crazy.
May be some one know the answer(hopefully:)

I want to get all macthes of a pattern in a string including the overlaping ones.
For example
the string is "xHxxHyyKzDt" 
and the pattern is /^(.*)H(.*)K(.*)D(.*)$/

so in one round of match $1=x  $2=xxHyy $3=z $4=t
in another                      $1=xHxx $2=yy $3=x $4=t


    while ($sequence=~/$pattern/g ) 
    doesn't work I think becaue the matches are overlapping            

   while ($sequence=~/(?=$pattern)/g ) 
also doesn't work

I would really appreciate if someone can help.
Thanks.
oznur