Enumerating all attributes of a Moo object

Links per page: 20 50 100

page 1 / 1

package Foo {
  use Moo;
  has a => (is => "ro");
  has b => (is => "ro");
}

my $bar = Foo->new(a => 42);

# Print only 'a'
say $_ for keys %{ $bar }

# Print all attributes
say $_ for keys( %{
   'Moo'->_constructor_maker_for('Foo')->all_attribute_specs
});

October 19, 2020 at 7:41:08 PM UTC - permalink -

- https://www.perlmonks.org/?node_id=1043195

attributes introspection meta moo oop perl

Links per page: 20 50 100

page 1 / 1