The subroutine should read:
sub user {
my $user = shift;
# $this->{r} is Apache request object
$this->{r}->$Response->{r}->user($user) if (defined $user);
return $this->{r}->$Response->{r}->user();
}
Niels van Dijke wrote:
All,
Can we have the following code added to Apache::ASP $Request object?
This will allow you to add Cookie based user name logging to Apache's
access log.
# Set a username (will end up in Apache access log)
$Request->user($Session->{user});
# Get username registered so far
my $user = $Request->user();
The method subroutine of the $Request object would be something like:
sub user {
my $user = shift;
# $this->{r} is Apache request object
$this->{r}->$Response->{r}->user($user) if (defined $user);
return $this->{r}->$Response->{r}->user($user);
}
Regard,
Niels
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
Niels van Dijke | Systems Development & Support | NCC-A | BT Global Services
Tel: +31 202 038 021 | Mob: +31 655 816 490 | E: [EMAIL PROTECTED] |
W: http://www.bt.net
BT MeetMe: Participant Passcode: [2927025#] / NL: 0800 0200 767/+31
(0)202 015 231 / UK: +44 (0)207 819 6110, See also:
https://btpeople.conferencing.bt.com/bt/603/eng/bridge.jsp
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]