You are overwriting a locally defined method (get_name) with an accessor at /usr/local/lib/perl/5.10.1/Moose/Meta/Attribute.pm line 1053 Moose::Meta::Attribute::_process_accessors('Moose::Meta::Attribute=HASH(0x1828380)', 'reader', 'get_name', undef) called at /usr/local/lib/perl/5.10.1/Class/MOP/Attribute.pm line 428 Class::MOP::Attribute::install_accessors('Moose::Meta::Attribute=HASH(0x1828380)') called at /usr/local/lib/perl/5.10.1/Moose/Meta/Attribute.pm line 1013 Moose::Meta::Attribute::install_accessors('Moose::Meta::Attribute=HASH(0x1828380)') called at /usr/local/lib/perl/5.10.1/Class/MOP/Class.pm line 891 Class::MOP::Class::__ANON__() called at /usr/local/share/perl/5.10.1/Try/Tiny.pm line 76 eval {...} called at /usr/local/share/perl/5.10.1/Try/Tiny.pm line 67 Try::Tiny::try('CODE(0x1820948)', 'Try::Tiny::Catch=REF(0x18187e8)') called at /usr/local/lib/perl/5.10.1/Class/MOP/Class.pm line 896 Class::MOP::Class::_post_add_attribute('Moose::Meta::Class=HASH(0x1819178)', 'Moose::Meta::Attribute=HASH(0x1828380)') called at /usr/local/lib/perl/5.10.1/Class/MOP/Mixin/HasAttributes.pm line 44 Class::MOP::Mixin::HasAttributes::add_attribute('Moose::Meta::Class=HASH(0x1819178)', 'Moose::Meta::Attribute=HASH(0x1828380)') called at /usr/local/lib/perl/5.10.1/Moose/Meta/Class.pm line 570 Moose::Meta::Class::add_attribute('Moose::Meta::Class=HASH(0x1819178)', 'name', 'reader', 'get_name', 'writer', 'set_name', 'definition_context', 'HASH(0x11d2a60)', 'is', ...) called at /usr/local/lib/perl/5.10.1/Moose.pm line 79 Moose::has('Moose::Meta::Class=HASH(0x1819178)', 'name', 'is', 'rw', 'writer', 'set_name', 'reader', 'get_name') called at /usr/local/lib/perl/5.10.1/Moose/Exporter.pm line 370 Moose::has('name', 'is', 'rw', 'writer', 'set_name', 'reader', 'get_name') called at Author.pm line 9 require Author.pm called at Post.pm line 6 Post::BEGIN() called at Author.pm line 0 eval {...} called at Author.pm line 0 require Post.pm called at post-test.pl line 3 main::BEGIN() called at Author.pm line 0 eval {...} called at Author.pm line 0 You are overwriting a locally defined method (set_name) with an accessor at /usr/local/lib/perl/5.10.1/Moose/Meta/Attribute.pm line 1053 Moose::Meta::Attribute::_process_accessors('Moose::Meta::Attribute=HASH(0x1828380)', 'writer', 'set_name', undef) called at /usr/local/lib/perl/5.10.1/Class/MOP/Attribute.pm line 432 Class::MOP::Attribute::install_accessors('Moose::Meta::Attribute=HASH(0x1828380)') called at /usr/local/lib/perl/5.10.1/Moose/Meta/Attribute.pm line 1013 Moose::Meta::Attribute::install_accessors('Moose::Meta::Attribute=HASH(0x1828380)') called at /usr/local/lib/perl/5.10.1/Class/MOP/Class.pm line 891 Class::MOP::Class::__ANON__() called at /usr/local/share/perl/5.10.1/Try/Tiny.pm line 76 eval {...} called at /usr/local/share/perl/5.10.1/Try/Tiny.pm line 67 Try::Tiny::try('CODE(0x1820948)', 'Try::Tiny::Catch=REF(0x18187e8)') called at /usr/local/lib/perl/5.10.1/Class/MOP/Class.pm line 896 Class::MOP::Class::_post_add_attribute('Moose::Meta::Class=HASH(0x1819178)', 'Moose::Meta::Attribute=HASH(0x1828380)') called at /usr/local/lib/perl/5.10.1/Class/MOP/Mixin/HasAttributes.pm line 44 Class::MOP::Mixin::HasAttributes::add_attribute('Moose::Meta::Class=HASH(0x1819178)', 'Moose::Meta::Attribute=HASH(0x1828380)') called at /usr/local/lib/perl/5.10.1/Moose/Meta/Class.pm line 570 Moose::Meta::Class::add_attribute('Moose::Meta::Class=HASH(0x1819178)', 'name', 'reader', 'get_name', 'writer', 'set_name', 'definition_context', 'HASH(0x11d2a60)', 'is', ...) called at /usr/local/lib/perl/5.10.1/Moose.pm line 79 Moose::has('Moose::Meta::Class=HASH(0x1819178)', 'name', 'is', 'rw', 'writer', 'set_name', 'reader', 'get_name') called at /usr/local/lib/perl/5.10.1/Moose/Exporter.pm line 370 Moose::has('name', 'is', 'rw', 'writer', 'set_name', 'reader', 'get_name') called at Author.pm line 9 require Author.pm called at Post.pm line 6 Post::BEGIN() called at Author.pm line 0 eval {...} called at Author.pm line 0 require Post.pm called at post-test.pl line 3 main::BEGIN() called at Author.pm line 0 eval {...} called at Author.pm line 0 Cannot delegate set_name to set_name because the value of author is not defined at /usr/local/lib/perl/5.10.1/Moose/Meta/Method/Delegation.pm line 99 Post::set_name('Post=HASH(0x1848938)', 'Monk') called at post-test.pl line 12 ------------------ (program exited with code: 255) Press return to continue