package Foo;
use Moose;

has 'first_name' => ( is => 'rw', isa => 'Str', required => 1);
has 'last_name' => ( is => 'rw', isa => 'Str', required => 1);

no Moose;
1;

##</code><code>##

use Foo;
use Test::More tests => 2;

ok( my $foo = Foo->new(
        first_name => 'Joe',
        last_name  => 'Average',
    )
);

ok( my $incomplete = Foo->new(
        first_name => 'Joe',
    )
);