next unless defined $regDate;

##</code><code>##

    seek(REGLOG, $offset[0] + 1, 1);