use Test::More;
-BEGIN {
- use_ok('Moose::Util', ':all');
-}
+use Moose::Util ':all';
{
package Foo;
use Test::More;
-BEGIN {
- use_ok('Moose::Util', ':all');
-}
+use Moose::Util ':all';
{
package Foo;
use Test::More;
-BEGIN {
- use_ok('Moose::Util', ':all');
-}
+use Moose::Util ':all';
{ package SCBR::Role;
use Moose::Role;
use Test::Builder::Tester;
use Test::More;
-BEGIN {
- use_ok('Test::Moose');
-}
+use Test::Moose;
{
package Foo;
use Test::Builder::Tester;
use Test::More;
-BEGIN {
- use_ok('Test::Moose');
-}
+use Test::Moose;
{
package Foo;
use Test::Builder::Tester;
use Test::More;
-BEGIN {
- use_ok('Test::Moose');
-}
+use Test::Moose;
{
package Foo;
use Test::Builder::Tester;
use Test::More;
-BEGIN {
- use_ok('Test::Moose');
-}
+use Test::Moose;
{
package Foo;
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
is( exception {
subtype 'ParentConstraint' => as 'Str' => where {0};
use Test::More;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
- use_ok('Moose::Meta::TypeConstraint::Parameterized');
-}
+use Moose::Util::TypeConstraints;
+use Moose::Meta::TypeConstraint::Parameterized;
my $r = Moose::Util::TypeConstraints->get_type_constraint_registry;
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
{
package Gorch;
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok("Moose::Util::TypeConstraints");
- use_ok('Moose::Meta::TypeConstraint::Parameterized');
-}
+use Moose::Util::TypeConstraints;
+use Moose::Meta::TypeConstraint::Parameterized;
BEGIN {
package MyList;
use Test::More;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
- use_ok('Moose::Meta::TypeConstraint::Parameterized');
-}
+use Moose::Util::TypeConstraints;
+use Moose::Meta::TypeConstraint::Parameterized;
my $r = Moose::Util::TypeConstraints->get_type_constraint_registry;
use Test::More;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
- use_ok('Moose::Meta::TypeConstraint::Parameterized');
-}
+use Moose::Util::TypeConstraints;
+use Moose::Meta::TypeConstraint::Parameterized;
# Array of Ints
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok("Moose::Util::TypeConstraints");
- use_ok('Moose::Meta::TypeConstraint::Parameterized');
-}
+use Moose::Util::TypeConstraints;
+use Moose::Meta::TypeConstraint::Parameterized;
is( exception {
subtype 'AlphaKeyHash' => as 'HashRef'
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
{
package Some::Class;
use Test::Fatal;
use Scalar::Util qw(refaddr);
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
# subtype 'aliasing' ...
use Test::More;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
## First, we check that the new regex parsing works
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
# testing the parameterize method
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
{
package Gorch;
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok("Moose::Util::TypeConstraints");
-}
+use Moose::Util::TypeConstraints;
is( exception {
subtype 'MySpecialHash' => as 'HashRef[Int]';
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok("Moose::Util::TypeConstraints");
-}
+use Moose::Util::TypeConstraints;
is( exception {
subtype 'MyCollections' => as 'ArrayRef | HashRef';
use Test::More;
-BEGIN {
- use_ok("Moose::Util::TypeConstraints");
-}
+use Moose::Util::TypeConstraints;
=pod
use Test::More;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
my $Str = find_type_constraint('Str');
isa_ok($Str, 'Moose::Meta::TypeConstraint');
use Test::More;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
foreach my $type_name (qw(
Any
use Test::More;
use Test::Fatal;
-BEGIN {
- use_ok('Moose::Util::TypeConstraints');
-}
+use Moose::Util::TypeConstraints;
{
package HTTPHeader;