$_=1234; m{ (?

(?&V)) # match and save to $+{P} (? .) # match and save to $+{Q} # this can be saved in $v_definition = qr// (?(DEFINE) (? ...) # aka (?&V) is three chars ) }xm;