open my $fh, "<", $file or die "Can't open '$file': $!"; #### open my $fh, "<", "Configs/$file" or die "Can't open '$file': $!"; #### foreach my $file (@files) { next if $file =~ m/^\./; # skip .. and . next unless -f "Configs/$file"; # test to see if a file open my $fh, "<", "Configs/$file" or die "Can't open '$file': $!";