my $tee = new IO::Tee(\*STDOUT,
          new IO::File(">>$config::logfile"));

Line 154: begin();
Line 162: print $tee colored ("---",$config::menucolor);
Line 187 from Perl64/lib/IO/File.pm: open($fh, $file);