open($fh, '<', ($qfn || die("...")));