--- trunk/lib/WebPAC/Input.pm 2007/02/04 23:10:18 800 +++ trunk/lib/WebPAC/Input.pm 2007/04/05 21:53:52 818 @@ -286,6 +286,8 @@ # return unless defined($l); # return $l unless ($rec_regex && $f_nr); + return unless ( defined($l) && defined($f_nr) ); + warn "-=> $f_nr ## |$l|\n" if ($debug); $log->debug("-=> $f_nr ## $l");