Select Code to Download

my $file = "file";
my $temp = "temp";
...
   open $file, '>', "$temp" . "$_";
   print $file "THIS IS DATA";
}

my $file = "file";
my $temp = "temp";
...
   open $file, '>', "$temp" . "$end";
   print $file "THIS IS DATA";
}