while ( $mech->links )