package Testicle;
use Test::Builder::Module;
require Test::More;
our @ISA = qw(Test::More);
use base 'Exporter';
our @EXPORT = @Test::More::EXPORT;
Test::More->import;

my $builder;
BEGIN {
  $builder = Test::Builder::Module->builder;
  my $class = ref $builder;
  no strict 'refs';
  no warnings 'redefine';
  *{ "${class}::_print" } = sub { shift; "Have my way with @_" };
}