print $q -> header (
	-type			=> 'application/octet-stream',
	-attachment		=> $attfeld[0],
	-Content_Range	=> 'bytes',
	-Content_length	=> length $content,
);