--- trunk/lib/WebPAC/Input.pm	2008/08/04 21:47:27	1107
+++ trunk/lib/WebPAC/Input.pm	2008/11/17 21:18:16	1121
@@ -315,7 +315,7 @@
 							warn "*** $d\n" if ($debug);
 
 						}
-						$log->error("error applying regex: $r") if ($@);
+						$log->error("error applying regex: ",dump($r)) if ($@);
 					}
 				}
 
@@ -719,6 +719,8 @@
 				line => $.,
 			};
 			$log->debug("regex: $regex");
+		} else {
+			die "can't parse: $_";
 		}
 	}