in reply to Match nested parens of arbitrary depth in 56 characters

perl -p0e 'tr/()//cd;eval{/$_/};$_=!$@'

Replies are listed 'Best First'.
38 characters
by Anonymous Monk on Jun 28, 2002 at 03:21 UTC
    perl -p0e'y/()//cd;eval{/$_/};$_=!$@'
[reply]
[d/l]

In Section Cool Uses for Perl