PerlIO::via::LAUTER_DEUTSCHER - a Perl IO layer to make output indistinguishable from someone yelling German
use PerlIO::via::LAUTER_DEUTSCHER;
binmode STDOUT, ':via(LAUTER_DEUTSCHER)'
print "Timmy pet the cute puppy.\n";
Running the above produces the following output:
DIETER HAUSTIER DER NETTE WELPE!
This module provides a Perl IO layer that translates output into German using Lingua::Translate. In addition to translation, the output is converted to upper case and the name "Timmy" is changed to "Dieter."
Ian Langworth, <ian@cpan.org>
Please report any bugs or feature requests to bug-acme-lauter-deutscher@rt.cpan.org, or through the web interface at http://rt.cpan.org. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
Copyright 2005 Ian Langworth, All Rights Reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
