$r->content_type('application/octet-stream');
$r->header_out('Content-disposition' => ("attachment;  filename=$filename_base")); 
open($fh,"<".$filename_full) or $m->redirect('file_open_failed.html?name='.$filename_full);
while(<$fh>) { $m->print($_); }
close $fh;
return;