my $blksize  = int ($filesize / 10);
  my $num_read = sysread(SRC, $buffer, $blksize);