Select Code to Download

my $infile = IO::File->new("c:\\...\\test.txt |");

my $infile = IO::File->new("c:\\...\\test.txt");