$beginRegexp = qr{($typespat) }x; ## $1 type; $2 option $endRegexp = qr{ }x; # $includeRegexp = qr{ }x; # $inlineComRegexp = qr{ }x; $beginRegexp = qr{ \\begin\{inline_($typespat)\}\{($cbbm)\}?}x; $endRegexp = qr{ \\end\{inline_(\1)\} }x; $includeRegexp = qr{ \\include_($typepat)(?:\[(.*?)\])?\{(.*?)\} }x; $inlineComRegexp = qr{ \\inline_($typepat)(?:\[(.*?)\])?\{($cbbm)\} }x;