Select Code to Download

open(DATA_IN, ">>$template_data") || print ...
...
   $_ = <DATA_IN>; # No, you can't do this on an output file
   ...

my $filename="test.txt";
my $template_data = "unsecure/".$filename;
...
print DATA_OUT;
close DATA_OUT;
__END__