Select Code to Download

   open my $fh,'<','file1.doc' or die "can't open file: $!";
## OR
   open my $fh2,'>>','file2.doc' or die "can't open file: $!";

close $fh2 or die "can't close file: $!";
close $fh or die "can't close file: $!";