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