open my $FH, '<', $file or next;