> -----Original Message-----
> From: Joshua Chamas [mailto:[EMAIL PROTECTED]]
> Sent: Friday, September 14, 2001 3:21 PM
> To: Mod Perl
> Subject: Updating $r->connection->aborted before $r->print() ?
>
>
> Hey,
>
> In my own experience it seems that I can only get
> $r->connection->aborted updated if I first do a $r->print().
> Is there any way to get aborted to update without
> $r->print?
my $fileno = $r->connection->fileno;
$s = IO::Select->new($fileno);
die "aborted" if grep { m/$fileno/ } $s->can_read(1);
HTH
--Geoff