Mailing List Archive

Request object API change request
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: asp-unsubscribe@perl.apache.org
For additional commands, e-mail: asp-help@perl.apache.org
Re: Request object API change request [ In reply to ]
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: asp-unsubscribe@perl.apache.org
> For additional commands, e-mail: asp-help@perl.apache.org
>

--
Niels van Dijke | Systems Development & Support | NCC-A | BT Global Services
Tel: +31 202 038 021 | Mob: +31 655 816 490 | E: Niels.vanDijke@bt.com |
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: asp-unsubscribe@perl.apache.org
For additional commands, e-mail: asp-help@perl.apache.org