in reply to Trying to count the captures in a compiled regular expression

In lieu of my unfinished Regexp::Parser, you could use Graham Barr's Regexp module, which allows you to say: 
use Regexp;
my $rx = Regexp->new('pattern');
my $nparens = $rx->nparens;

[download]
His module is not a parser like mine is, but rather, an XS interface to the C code behind the regex engine.
_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker, who'd like a job (NYC-area)
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;

In Section Seekers of Perl Wisdom