Select Code to Download

use CGI qw(:standard);
print header("text/plain");
print "text";

use Cwd;
...
close (FILE); 
system('iexplore '.cwd.'\stuff.txt');"

set PATH=%PATH%;C:\Progra~1\Intern~1;