until ( -e "${tmp}xsfit.dat" ) {
 bjmsys("xspec - ${tmp}.xcm", $v); 
}

open(DAT, "${tmp}xsfit.dat") || die ("Could not open file!"); 

my @kT=<DAT>; close DAT;