use Test::More;
use FindBin;
-use System::Introspector::LibDirs::Perl;
+use System::Introspector::Probe::LibDirs::Perl;
my $dir = "$FindBin::Bin/data/libdir/perl";
no warnings 'redefine';
-*System::Introspector::LibDirs::Perl::_open_locate_libdirs_pipe = sub {
+*System::Introspector::Probe::LibDirs::Perl::_open_locate_libdirs_pipe = sub {
my $output = "$dir/lib/perl5\n";
open my $fh, '<', \$output;
return $fh;
};
-my $probe = System::Introspector::LibDirs::Perl->new(
+my $probe = System::Introspector::Probe::LibDirs::Perl->new(
root => $dir,
);
my $data = $probe->gather;