Help for this page

Select Code to Download


  1. or download this
        package Filter::Handle;
        use strict;
    ...
        }
    
        sub CLOSE { }
    
  2. or download this
        my $f = Filter::Handle->new(\*STDOUT,
            output => sub {
    ...
        );
    
        print "Foo";