print $cgi->header('-type' => "application/octet-stream;name=$file", '-Content-Disposition' => "attachment;filename=$file", '-Content-Transfer-Encoding' =>"binary");