I wrote a program a couple of weeks ago that contained the following expression:

  next if /^[][\s{}();,]*$/;
[download]

When I looked at it yesterday, I was sure I'd screwed up. Ittook me quite a while to figure out the square brackets. (It didn't help that it was part of the following line:

  $GOOD = 0, next if /^[][\s{}();,]*$/ && ! /\[\s*\]/ && ! /\{\s*\}/;
[download]

--
Mark Dominus
Perl Paraphernalia