Package: speedy-cgi-perl
Version: 2.22-10
Severity: important
This script doesn't work when run with speedy. Every other
invocation loses the output completely, while the other
loses the first character.
#!/usr/bin/perl
use IO::Handle;
my $stdout = IO::Handle->new;
$stdout->fdopen( 1, 'w' ) || print "fdopen failed\n";
{
local *STDOUT = $stdout;
select(select());
}
print "OK\n";
__END__
% speedy t.pl
% speedy t.pl
K
fdopen failed
% speedy t.pl
% speedy t.pl
K
fdopen failed
Seen on both etch and sid, so it's not a Perl 5.10 regression.
This is breaking request-tracker3.8, see the thread at
http://lists.bestpractical.com/pipermail/rt-users/2008-November/055561.html
--
Niko Tyni [EMAIL PROTECTED]
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
