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

##</code><code>##

$bname = $tnum . ".tmp";
$fname = $TMP_DIR . "\\" . $bname;