seek $in_fh,0,0;