open $fh, ">", "/tmp/inc.$$" or die "error: failed to open file=/tmp/inc.$$ for writing.\n";