Yet Another CPAN Grep

Test-Mojo-WithRoles ( J/JB/JBERGER/Test-Mojo-WithRoles-0.02.tar.gz, JBERGER, 2015; MetaCPAN )

Test-Mojo-WithRoles/lib/Test/Mojo/WithRoles.pm ( view source; MetaCPAN )



our $VERSION = '0.02';
$VERSION = eval $VERSION;

use Role::Tiny ();
use Test::Mojo;

use Mojo::JSON 'j';

sub import {
  my ($class, @roles) = @_;
  @roles = map { s/^\+// ? $_ : "Test::Mojo::Role: