Pure Perl emulation of GNU tee

WWW:	http://search.cpan.org/dist/Tee/