Select Code to Download

#!/usr/bin/perl   
use warnings;
use strict;  
...

close $output; 
exit;

C:\Users\x\Desktop>p5.pl
Unknown PerlIO layer "D" at C:\Users\x\Desktop\p5.pl line 10.
Cannot open file'Result_File.txt'.