sub get_attribute {
    my ( $self, $attribute ) = @_;
    
    return exists $self->{ATTRIBUTES}
        ? $self->{ATTRIBUTES}{$attribute}
        : undef;
}

##</code><code>##

sub get_attribute {
    my ( $self, $attribute ) = @_;

    return $self->{ATTRIBUTES}{$attribute};
}