open(my $fh, '<', "$file_path") or return 0; #### open(my $fh, '<', $file_path) or return 0;