The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package Bar;
use Moose;
use Moose::Util::TypeConstraints;

type Baz => where { 1 };

subtype Bling => as Baz => where { 1 };

1;