Skip Menu |

This queue is for tickets about the IO-Tee CPAN distribution.

Report information
The Basics
Id: 13449
Status: new
Priority: 0/
Queue: IO-Tee

People
Owner: Nobody in particular
Requestors: GLASSER [...] CPAN.ORG
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: (no value)
Fixed in: (no value)



Subject: IO::Tee needs BINMODE support
You can't use "binmode" with an IO::Tee. Add the following function: sub BINMODE { my $self = shift; my $ret = 1; if (@_) { for my $fh (@$self) { undef $ret unless binmode $fh, $_[0] } } else { for my $fh (@$self) { undef $ret unless binmode $fh } } return $ret; } (Note: until the module is fixed, you can always make your own IO::Tee::Binmode which ISA IO::Tee and has this function.)