Select Code to Download

open (my $myfile, "$i") or die...
open (my $myfile, "<$i")or die... #no space after <
open (my $myfile, '<', "$i") or die...
open (my $myfile, '<', \$i) or die...
take your pick...

$ cat abc/abc.txt
line 1
line 2
$

use strict;
use warnings;
...
   };

print qq{\n};

Test 1:
...

Test 5:
abc/abc.txt