=head1 NAME Text::OutputFilter - Filter and modify output =head1 SYNOPSYS use Text::OutputFilter; my $bucket = ""; tie *STDOUT, "Text::OutputFilter"; tie *HANDLE, "Text::OutputFilter", 4; tie *HANDLE, "Text::OutputFilter", 4, *STDOUT; tie *STDOUT, "Text::OutputFilter", 4, \$bucket; tie *OUTPUT, "Text::OutputFilter", 4, *STDOUT, sub { "$_[0]" }; =head1 DESCRIPTION See C or C. =head1 BUGS & TODO =over 4 =item format Output from format/write is not cought. This seems to be a bug in perl itself, and is unlikely to be fixed by this module. =item examples There should be example files with both input and output shown. =back =head1 AUTHOR H.Merijn Brand =head1 COPYRIGHT AND LICENSE Copyright (C) 2006-2007 H.Merijn Brand for PROCURA B.V. This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =cut