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