RE: strange uninitialized value error.

[Rob Bloodgood]

>   Changing:
> >     warn "r->uri is undef" unless defined $r->uri; #### debugging?!?!?
> >     my $subr = $r->lookup_uri($r->uri); # uri is relative to doc root
> 
>   To:
>     $uri = $r->uri;
>      warn "\$uri is undef" unless defined $uri; #### debugging?!?!?
>      my $subr = $r->lookup_uri($uri); # uri is relative to doc root

Hmm... is $subr defined if $uri is EMPTY?

There's no check here for that.

(my $.02)

L8r,
Rob

#!/usr/bin/perl -w
use Disclaimer qw/:standard/;