foreach my $file (@nbdc_files){
    open my $fh, "./$nbdc_dir/$file" || die "Can't open ./$nbdc_dir/$file";
    push @nbdc_filehandles, $fh;
     # etc.
}