File Coverage

blib/lib/Test/Deep/NoTest.pm

Criterion	Covered	Total	%
statement	11	11	100.0
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	14	14	100.0

use strict;
use warnings;

# this is for people who don't want Test::Builder to be loaded but want to
# use eq_deeply. It's a bit hacky...

package Test::Deep::NoTest 1.202;
# ABSTRACT: Use Test::Deep outside of the testing framework

our $NoTest;

{
  local $NoTest = 1;
  require Test::Deep;
}

sub import {
  my $import = Test::Deep->can("import");
  # make the stack look like it should for use Test::Deep
  my $pkg = shift;
  unshift(@_, "Test::Deep");
  push @_, '_notest';
  goto &$import;
}

1;

#pod =head1 SYNOPSIS
#pod
#pod   use Test::Deep::NoTest;
#pod
#pod   if (eq_deeply($a, $b)) {
#pod     print "they were deeply equal\n";
#pod   }
#pod
#pod =head1 DESCRIPTION
#pod
#pod This exports all the same things as Test::Deep but it does not load
#pod Test::Builder so it can be used in ordinary non-test situations.

__END__