my $blksize = (stat($fh))[11] || 16384;