Help for this page
sub get_attribute { my ( $self, $attribute ) = @_; return defined($attribute) ? $self->{ATTRIBUTES}{$attribute} : und +ef; }