perl -d -e 0 Loading DB routines from perl5db.pl version 1.32 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::(-e:1): 0 DB<1> $message = q(some_fields msg="http_decoder: HTTP.Unknown.Tunnelling" some_fields) DB<2> x $message 0 'some_fields msg="http_decoder: HTTP.Unknown.Tunnelling" some_fields' DB<3> x $message =~ m/msg=\"+((?:([^:,]+):\s|)([^,]+?)\s*(?:\s*,.*?|)))\"+/ Unmatched ) in regex; marked by <-- HERE in m/msg=\"+((?:([^:,]+):\s|)([^,]+?)\s*(?:\s*,.*?|))) <-- HERE \"+/ at (eval 7)[/usr/share/perl/5.10/perl5db.pl:638] line 2. at (eval 7)[/usr/share/perl/5.10/perl5db.pl:638] line 2 eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D | $DB::db_stop; $message =~ m/msg=\\"+((?:([^:,]+):\\s|)([^,]+?)\\s*(?:\\s*,.*?|)))\\"+/; ;' called at /usr/share/perl/5.10/perl5db.pl line 638 DB::eval called at /usr/share/perl/5.10/perl5db.pl line 3444 DB::DB called at -e line 1 DB<4>