tie *STDxxx, 'My::Tee', '\path\to\logfile';