Help for this page
my( $x, $y ) = ( $a, $a );
my( $x, $y ) = ( $o->next, $o->next );
my $x = $o->next; my $y = $o->next;
my( $x, $y ) = ( func(), func() );