Ein kleines Regex-Rätsel

[Marko]

Hallo, ich hab ein Rätsel für gemacht: Was matcht dieses Regex-Pattern (Perl Syntax)?

$pattern = '/(?<=^).(?<![^r])(?=(?(?!.)d|(?P<a>e))).(g(?=(?(?=[a-zA-Z0-9])(?P=a)|f))|(?<![^g])(?(?=[a-zA-Z0-9])(?P=a)|c)){2}(?(?=[a-zA-Z0-9])x|y)(?![^$])/';

Viel Spass,

Marko