Select Code to Download

my $ffdb = "ffdb.dat";
open my $fd, '<', $ffdb or die "open: $!";
chomp (my @ffdbdata = <$fd>);
...
  }
}
close $fd;