Problem with Apache->request

[Randy Rasmussen]

I am having a problem with a module that needs Apache->request.

The module is AuthCookieLDAP. I have a .htaccess (/test2/.htaccess) file
that looks like:
AuthType Apache::AuthCookieLDAP
AuthName SA
PerlAuthenHandler Apache::AuthCookieLDAP->authenticate
PerlAuthzHandler Apache::AuthCookieLDAP->authorize
require valid-user

That in turn reads my httpd.conf file which has the following:
<Files LOGIN>
 AuthType Apache::AuthCookieLDAP
 AuthName SA
 SetHandler perl-script
 PerlHandler Apache::AuthCookieLDAP->login
</Files>

PerlModule Apache::AuthCookieLDAP
PerlSetVar SAPath /
PerlSetVar SALoginScript /cgi-bin/login.pl
PerlSetVar SALDAP_DN "o=isp"
PerlSetVar SADBI_DSN "isp"
PerlSetVar SALDAP_SecretKeyFile .../apache/foobar.com.key
PerlSetVar SALDAP_User tesuser
PerlSetVar SALDAP_host host.foobar.com
#PerlSetVar SALDAP_host ldap.foobar.com
PerlSetVar SALDAP_EncryptionType "none"
PerlSetVar SALDAP_SessionLifetime 00-24-00-00


Then it runs the login.pl script which looks like:
#!/usr/bin/perl
#
# $Id: login.pl,v 1.1 2000/07/11 17:03:05 jacob Exp $
use strict;
use 5.004;
use Text::TagTemplate;
use Apache;

my $t = new Text::TagTemplate;
my $r = Apache->request();

my $destination;
my $authcookiereason;
if ( $r->prev() ) { # we are called as a subrequest.
        $destination = $r->prev()->args()
                     ? $r->prev()->uri() . '?' .  $r->prev->args()
                     : $r->prev()->uri();
        $authcookiereason = $r->prev()->subprocess_env(
'AuthCookieReason' );
} else {
        $destination = $r->args( 'destination' );
        $authcookiereason = $r->args( 'AuthCookieReason' );
}
$t->add_tag( DESTINATION => $destination );

unless ( $authcookiereason eq 'bad_cookie' ) {
        $t->template_file( "../html/login.html" );
} else {
        $t->template_file( "../html/login-failed.html" );
}

$r->send_http_header;
print $t->parse_file unless $r->header_only;


When I go to /test2/index.html I get this error:
Can't locate object method "request" via package "Apache" at
.../cgi-bin/login.pl line 16.
[Wed Oct 10 10:43:26 2001] [error] [client 172.28.22.253] Premature end
of script headers: .../cgi-bin/login.pl

Here is the software and versions I have installed:

apache 1.3.20, Apache-AuthCookie-3.00, Apache-AuthCookieLDAP-0.02,
mod_perl-1.26, perl5.005_02

Please help. I have looke all over deja.com, and all of the perl and
mod_perl sites I can think of to no avail.

Thanks in advance,

Randy


begin:vcard 
n:Rasmussen;Randy
tel;fax:817-963-0295
tel;work:817-967-9242
x-mozilla-html:FALSE
org:EDS;Unix Engineering
adr:;;4255 Amon Carter Blvd.;Fort Worth;Tx;76155;USA
version:2.1
email;internet:[EMAIL PROTECTED]
title:Senior Unix Engineer
x-mozilla-cpt:;-16016
fn:Randy Rasmussen
end:vcard