How would you do that if the user turns the log_to_file switch on, does some stuff, then turns the log_to_file switch off?

You'd have to duplicate every print command, like this:

if ($tee) {
   print $tee "What did I want to say?\n"
} else {
   print "What did I want to say?\n"
}
[download]