Skip Menu |

This queue is for tickets about the IO CPAN distribution.

Report information
The Basics
Id: 67545
Status: resolved
Priority: 0/
Queue: IO

Owner: Nobody in particular
Requestors: APOCAL [...]

Bug Information
Severity: Critical
Broken in: 1.25
Fixed in: (no value)

Subject: $handle->blocking(0) does not work on perl-5.6.2-linux for tied filehandles
Download (untitled) / with headers
text/plain 478b
I noticed this problem while diagnosing POE's testsuite FAIL on perl-5.6.2 and made a minimal testcase to show the problem. I'm not sure what changed between 5.6.2 and 5.8.1 but all perls above 5.8.1 work fine. I have not tested any 5.7.x perl but I've read the perl580delta and perl581delta but they say nothing about tied filehandles. I hope you can figure this out and solve it! Please let me know if you need any more information like perl -V or anything. -- ~Apocalypse
#!/usr/bin/perl use strict; use warnings; use Tie::Handle; use IO::Handle; BEGIN { package My::TiedHandle; use vars qw(@ISA); @ISA = qw( Tie::StdHandle IO::Handle ); } my $fh = IO::Handle->new; tie *$fh, 'My::TiedHandle'; open *$fh, "+<$0" or die "couldnt open tied handle: $!"; $fh->blocking(0); print "All is OK!\n"; exit;
Subject: io_blocking_output
Download io_blocking_output
application/octet-stream 1.8k

Message body not shown because it is not plain text.

Ticket migrated to github as

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to