Help for this page

Select Code to Download

Select or download this

my $pat = qr {
    (?(DEFINE)
...
    )
    (?&expr)
}x;