What it should be:

my $read = read($fh_in, $buf, $blk_size, length($buf));
[download]

I understand now. When I read the description for read(), I mistakingly thought it was for an offset in the file.

Thanks again. This was a great help and learning experience.