If you're using Perl 5.10.1 or later,
you may also find Regexp::Debugger
useful for understanding where your regex
isn't behaving as you expect.
In this case, the module took about 2 seconds to
show me that: