Help for this page
while (defined($pre_ref_pos_b) && defined($pre_ref_pos_e) eq $ref_p +os_b && $ref_pos_e) {