#!/usr/bin/perl use strict; use warnings; use Test::More tests => 4; use Moose::Test::Case; Moose::Test::Case->new->run_tests;