Перепишите в новый файл все строки, начинающиеся с заданного слова

#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include <stdlib.h>
 
int starts_from_word(const char * s, const char * w){
    int len;
    return ( strstr(s, w) == s && ( ispunct(*(s + (len = strlen(w)))) || isspace(*(s + len)) ) );
}
 
#define INPUT_NAME "in.txt"
#define OUTPUT_NAME "out.txt"
 
int main(void){
    FILE * fin, * fout;
    char buf[BUFSIZ], wrd[BUFSIZ];
    
    printf("First word: ");
    if ( scanf("%s", wrd) != 1 ){
        fprintf(stderr, "Wrong input!\n");
        exit(1);
    }
    
    if ( ( fin = fopen(INPUT_NAME, "r") ) == NULL ){
        fprintf(stderr, "Can't open input file!\n");
        exit(1);
    }
    if ( ( fout = fopen(OUTPUT_NAME, "w") ) == NULL ){
        fprintf(stderr, "Can't open output file!\n");
        fclose(fin);
        exit(1);
    }
    
    while ( fgets(buf, BUFSIZ, fin) ){
        if ( starts_from_word(buf, wrd) ){
            if ( fputs(buf, fout) == EOF ){
                fprintf(stderr, "Can't write to output file!\n");
                if ( fclose(fin) )
                    perror("fclose");
                if ( fclose(fout) )
                    perror("fclose");
                exit(1);
            }
        }
    }
    if ( ferror(fin) ){
        fprintf(stderr, "Can't read from input file!\n");
        if ( fclose(fin) )
            perror("fclose");
        if ( fclose(fout) )
            perror("fclose");
        exit(1);
    }
    
    printf("Done.\n");
    
    exit( fclose(fin) | fclose(fout) );
}