my @attribute_names = ('attr1', 'attr2', 'attr3');
foreach my $attribute (@attribute_names) {
my $value = $self->get($attribute);
print "$attribute => $value\n";
}
####
my @attribute_names = ('attr1', 'attr2', 'attr3');
foreach my $attribute (@attribute_names) {
my $function_name = "get_$attribute";
my $value = $self->$function_name;
print "$attribute => $value\n";
}
##
##
my @attr_names = ('attr1', 'attr2', 'attr3');
my @values = $self->get(@attr_names);
print "$attr_names[$_] => $values[$_]\n" for (0 .. $#attr_names);
##
##
FooClass->define_attributes(
foo => { Type => 'MULTIPLE(x)', Default => 0 },
);