if ("true" eq $flag) {
    open (OUT, ">output.txt") or die ("could not open output.txt: $!");
} else {
    open (OUT, ">&STDOUT");
}