Select Code to Download

open my $fh, ">FILENAME" or die "Can't write FILENAME: $!";
print $fh "We are writing a line of text to a file.\nSecond line";
close $fh;

<%
Dim objFSO, objTextStream, file
...
Set objTextStream = Nothing
Set objFSO = Nothing
%>

try {
        BufferedWriter out = new BufferedWriter(new FileWriter("outfil
+ename"));
...
        out.close();
    } catch (IOException e) {
    }