Skip Menu |

This queue is for tickets about the Filter CPAN distribution.

Report information
The Basics
Id: 101033
Status: stalled
Priority: 0/
Queue: Filter

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

Bug Information
Severity: Normal
Broken in: 1.53
Fixed in: (no value)

Subject: filter_read in block mode makes DATA handle empty
Download (untitled) / with headers
text/plain 205b
Found while debugging bug report for Switch: Test case attached. If I remove "use S1;" there is content in DATA. -- Alexandr Ciornii,
text/x-perl 251b
package S1; use strict; use Filter::Util::Call; sub import { filter_add({}); 1; } sub unimport { filter_del() } sub filter { my($self) = @_ ; my $status = 1; $status = filter_read(1_000_000); print "code: !$_!\n\n"; return $status; } 1;
text/x-perl 72b
#!/usr/bin/perl -w use S1; print 'data: ', <DATA>; __DATA__ test
Download (untitled) / with headers
text/plain 208b
I added a TODO testcase to the repo But I'm not sure if it can be fixed at all, or if we have to leave that as serious limitation. I'll check. -- Reini Urban

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

Please report any issues with to