my $cur_pos = pos($m);
print $FH substr($m, $cur_pos, $sz);
pos($m) = $cur_pos + $sz;