Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

RE: Filehandle Filter

by btrott (Parson)
on Aug 11, 2000 at 08:51 UTC ( #27460=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
        package Filter::Handle;
        use strict;
    ...
        }
    
        1;
    
  2. or download this
        my $f = Filter::Handle->new(\*STDOUT,
            sub { "Foo: @_\n" });
        print "Bar";
    
  3. or download this
        use Filter::Handle qw/subs/;
        Filter \*STDOUT, sub { "Foo: @_\n" };
        print "Bar";
        UnFilter \*STDOUT;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://27460]
help
Chatterbox?
[marto]: good morning all

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (8)
As of 2016-12-06 09:17 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (101 votes). Check out past polls.