#!/usr/bin/env perl
use strict;
use warnings;
use Test::More tests => 2;
package Foo;
use Moose;
with 'MooseX::Role::Matcher';
package main;
my $foo = Foo->new;
ok($foo->does('MooseX::Role::Matcher'),
'role consumption works');
ok($foo->can('match'),
'provided method exists');