So, you mean like this?

use CGI;
print CGI::header( "text/html" ),
      CGI::escapeHTML( $data_from_somewhere );
[download]

~Thomas~ 

"Excuse me for butting in, but I'm interrupt-driven..."