sub edits {
    return if ! -f;
    return if ! /^Khlog.08$/;

    open my $log_fh, '<', $_
        or die "Can't read '$File::Find::name': $!";
    my ( $found1, $found2 );
    while ( defined( my $line = <$log_fh> ) ) {
        $found1 = $found1 || ( $line =~ /002389983/ );
        $found2 = $found2 || ( $line =~ /29994339499/ );
        last if $found1 && $found2;
    }
}