Program Repair Shop

Repeated code

Will 1024 work with compare_by_first_block() even for short files?
Not as written:

     511        my ($kount) = read FD, $first_block, $readsize;
     512        if ($kount != $readsize)
     513        {
     514            print STDERR "ERROR: file \"$filenm\", is short ",
     515                         "(read $kount of $readsize bytes), skipping\n";
     516        }

I think there's some principle at work here
- Something about trying to control things too closely
- I'm not quite sure what it is, though
Anyway, compare_by_first_block() is fairly complicated
- 33 lines of code over two pages