10 has one => (is => 'ro', lazy => 1, default => quote_sub q{ {} });
11 has two => (is => 'ro', lazy => 1, builder => '_build_two');
13 has three => (is => 'ro', default => quote_sub q{ {} });
14 has four => (is => 'ro', builder => '_build_four');
15 sub _build_four { {} }
16 has five => (is => 'ro', init_arg => undef, default => sub { {} });
17 has six => (is => 'ro', builder => 1);
24 is_deeply($h[$_], {}, "${attr}: empty hashref \$h[$_]") for 0..1;
26 isnt($h[0],$h[1], "${attr}: not the same hashref");
29 check one => map Foo->new->one, 1..2;
31 check two => map Foo->new->two, 1..2;
33 check three => map Foo->new->{three}, 1..2;
35 check four => map Foo->new->{four}, 1..2;
37 check five => map Foo->new->{five}, 1..2;
39 check six => map Foo->new->{six}, 1..2;