Select Code to Download

use strict;

...
open(OUTFILE, ">/path/to/file");
print OUTFILE $_ foreach(@lines);
close(OUTFILE);