package Third;
use Filter::Util::Call;
$\ = $/; $, = ":";
print 4, __LINE__;
## Hello
BEGIN { filter_add ( sub { $status = filter_read(); $_ = "" if /^##/; return $status; } ); }
print 7, __LINE__;
## World;
print 9, __LINE__;
#line 42
print 11, __LINE__;