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