Select Code to Download

my @file = <INFO>;
foreach my $entry (@file) {
...
};

foreach my $entry (<INFO>) {
...
};

foreach my $entry (@file) {
  chomp $entry;
...

  ...
};