$r = HTTP::Request->new(GET=>'/Hey');
$fr = Apache::FakeRequest->new('r'=>bless $r, HTTP::Request (or about a million other different variations) );

$fr->r->uri (or just $fr->r) not found at run time.