#!/usr/bin/perl
use warnings;
use strict;

use Test::More tests => 1;
use My::MooseChild;

my $m = 'My::MooseChild'->new(a => 2, b => 3);
is $m->frob, 5, 'frobs';