--- a/common/tools/raptor/XML/SAX/PurePerl.pm	Fri Nov 13 17:47:50 2009 +0000
+++ b/common/tools/raptor/XML/SAX/PurePerl.pm	Fri Nov 13 17:48:12 2009 +0000
@@ -319,6 +319,12 @@
             $self->characters({Data => $chars});
             last;
         }
+        elsif ($data =~ /(.*?)\]+$/s) {
+            my $chars = $1;
+            $reader->move_along(length($chars));
+            $self->characters({Data => $chars});
+            $data = $reader->data(3);
+        }
         else {
             $self->characters({Data => $data});
             $reader->move_along(length($data));