matching/nesting anything

[hpant pant]

Hi ,
can anyone explain me, how below code works ,dealing with nested patterns. i
am not able to understand the ((?:(?!BEGIN)(?!END).)*)  part.

while (s/BEGIN((?:(?!BEGIN)(?!END).)*)END//gs) {
                # do something with $1
                }


Thanks
HP