$fname = $TMP_DIR . "\\" . $tnum . ".tmp";
($bname = $fname) =~ s#.*\\##s;