Venus::Role::Defaultable

Defaultable Role

Defaultable Role for Perl 5

package Example;

use Venus::Class 'attr', 'with';

with 'Venus::Role::Defaultable';

attr 'name';

sub defaults {
  {
    name => 'example',
  }
}

package main;

my $example = Example->new;

# bless({name => 'example'}, "Example")

This package provides a mechanism for setting default values for missing constructor arguments.

t/Venus.t: pdml: authors t/Venus.t: pdml: license