The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package t::Frontend;
use strict;
BEGIN{ if (not $] < 5.006) { require warnings; warnings->import } }

use ExtUtils::MakeMaker ();

BEGIN {
    $INC{"CPAN.pm"} = 1; #fake load
    $INC{"Test/Reporter/Transport/Metabase.pm"} = 1; #fake load
    $CPAN::VERSION = 999;
    $Test::Reporter::Transport::Metabase::VERSION = 999;
    $CPAN::Reporter::VERSION ||= 999;
    $CPAN::Reporter::History::VERSION ||= 999;
}

package CPAN::Shell;

sub myprint {
    shift;
    print @_;
}

sub mywarn {
    shift;
    print @_;
}

sub colorable_makemaker_prompt {
    goto \&ExtUtils::MakeMaker::prompt;
}

package CPAN;

$CPAN::Frontend = $CPAN::Frontend = "CPAN::Shell";

1;