Select Code to Download

system( "echo $filename > lines/$filename" );

open( FH, ">lines/$filename );
print FH $filename;
close FH;