Help for this page

Select Code to Download


  1. or download this
    {
        rest => $next_node,
        first => $data
    }
    
  2. or download this
    sub value {
        my ($self) = @_;
    ...
                     $self->{rest} ? $self->{rest}->value : ());
        return @value;
    }
    
  3. or download this
    sub value {
        my ($self) = @_;
        return ($self->{first},
                $self->{rest} ? $self->{rest}->value : ())
    }
    
  4. or download this
    sub value {
        my ($self) = @_;
        return @{[$self->{first},
                  $self->{rest} ? $self->{rest}->value : ()]};
    }