read $fh, $old, $readsizei;