my $str = " ^ <$start_rule> \$ $rules "; my $link = bless(\$str, 'Regexp::Grammars::Precursor'); $parser = qr{$link}ixs; #### my $str = " ^ <$start_rule> \$ $rules "; $parser = qr{$link }ixs;