#!/usr/bin/perl
use 5.008;
use strict;
use warnings 'all';
BEGIN {
$| = 1;
}
use Test::More tests => 2;
use Test::NoWarnings;
use File::Spec::Functions ':ALL';
use Class::Inspector ();
# Override the perl path for testing purposes
$Portable::FAKE_PERL =
$Portable::FAKE_PERL = rel2abs(
catfile( qw{
t data perl bin perl.exe
} )
);
SKIP: {
unless ( Class::Inspector->installed('CPAN::Config') ) {
skip( "CPAN::Config not found", 1 );
}
eval {
require Portable;
Portable->import('CPAN');
};
ok( ! $@, '->import(CPAN) ok' );
}