in reply to Moose problem.

Because  $self->get_option( 1 ); returns undef? Try Data::Dump::dd( $s ); and see what you get

In Section Seekers of Perl Wisdom