Aha! Thanks very much, you pointed me in the right direction. I don't completely
understand it, but I do have it working.
The function
$Request->ServerVariables("AUTH_USER")
was not actually returning a string containing the username, but something like this
(a reference?):
Win32::OLE=HASH(0x21afb80)
which, when printed, would output the username on the webpage. (I'm assuming the ASP
syntax of <%=$variable%> is equivalent to a $Response->write with double-quotes?)
I found some documentation that showed including the line:
use Win32::OLE qw(in valof with OVERLOAD);
would allow the real string to be returned. I'm not quite technical enough with perl
to understand why it works, but it does work.
Thanks!
-----Original Message-----
From: Wilson, Douglas [mailto:[EMAIL PROTECTED]
Sent: Wednesday, October 01, 2003 7:36 PM
To: Dan Ratzlaff; [EMAIL PROTECTED]
Subject: RE: substitution operator not working under ASP?
> From: Dan Ratzlaff [mailto:[EMAIL PROTECTED]
> But this page is outputting:
>
> Authentication type was NTLM
>
> Username is: DOMAIN\username
>
> Modified username: DOMAIN\username
When it comes to web output (or any output for that matter),
I never trust what I see, and when
things just don't seem right it sometimes helps to print
hex values of the strings you're wondering about:
print unpack("H*", $username);
print unpack("H*", "DOMAIN\\");
etc.
Yes, its a shot in the dark, and a long one at that...
HTH
Douglas Wilson
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
