if (DLBUTTON eq 'DOWNLOADFILE') {
  if (PEOPLE LOGIN USING .HTACCESS) {
    $fileName = "$ENV{'REMOTE_USER'}-output.txt";
  } elsif (USING REMOTE ADDRESS) {
    $fileName = "$ENV{'REMOTE_ADDR'}-output.txt";
  }

  open (CONTENT, ">/html/downloads/$fileName");

  while (@fileContentForUser) {
    # PERFORM ANY FORMATTING OR OTHER PER LINE STUFF HERE 
    
    print CONTENT "$_\n";
  }

  print qq {
    <script language=javascript><!--
    window.open('/downloads/$fileName','_blank','')
    //--></script>
  };

##</code><code>##

<input type=button value="DOWNLOAD" onclick="window.open('/cgi-bin/SCRIPT_NAME?DLBUTTON=DOWNLOADFILE','','')"

##</code><code>##

opendir (DIR, '/html/downloads/');
@files = grep /-output.txt/, readdir (DIR);
closedir(DIR);

foreach (@files) {
	unlink ("/html/downloads/$_");
}