Help for this page
sub _print { print $msg, @_; ... _print("hello"); _print("world");
use IO::Tee (); ... print("hello"); print("world");