my( $x, $y ) = ( $o->next, $o->next );