Help for this page

Select Code to Download

Select or download this

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