for (chunkcol = 0; chunkcol < (BitBufferLength / CHUNKSIZE); chunkcol++) { foreach $masknum (@mask) { if ( ( BitBuffer[chunkcol] & mask[$masknum] ) == $seabits[$masknum]) { return ( ( chunkcol * CHUNKSIZE) + $masknum ); # FIXME: Check for fenceposting error(s) } } } return ($RET_NOTFOUND);