## output to STDOUT if $verbose mode seleted but no output log if ($verbose && !$createlog && !$logfile) { open (LOGFILE, ">&1") or dying($!); } else { use Win32::GUI; my ($DOS) = Win32::GUI::GetPerlWindow(); Win32::GUI::Hide($DOS); }