view release on metacpan or  search on metacpan

t/Helper.pm  view on Meta::CPAN

  my $caller = caller;
  my $test_mojo = Test::Mojo->new;

  no strict 'refs';
  *{"$caller\::t"} = \$test_mojo;

  eval <<"  CODE" or die $@;
  package $caller;
  use Mojo::Base -base;
  use Test::More;
  strict->import;
  warnings->import;
  1;
  CODE
}

1;