Server IP : 173.249.157.85 / Your IP : 3.149.25.222 Web Server : Apache System : Linux server.frogzhost.com 3.10.0-1127.19.1.el7.x86_64 #1 SMP Tue Aug 25 17:23:54 UTC 2020 x86_64 User : econtech ( 1005) PHP Version : 7.3.33 Disable Function : NONE MySQL : OFF | cURL : OFF | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/local/share/perl5/Test/Deep/
Current File : /usr/local/share/perl5/Test/Deep//NoTest.pm
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;
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;
=head1 NAME
Test::Deep::NoTest - Use Test::Deep outside of the testing framework
=head1 SYNOPSIS
use Test::Deep::NoTest;
if (eq_deeply($a, $b)) {
print "they were deeply equal\n";
}
=head1 DESCRIPTION
This exports all the same things as Test::Deep but it does not load
Test::Builder so it can be used in ordinary non-test situations.