> -----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 

Reply via email to