The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

#!/usr/bin/env perl
use strict;
use lib 'test-data/lib', 't/lib';
use TestHelper qw( source2pi );
use Test::More import => [qw( done_testing is )];
use Test::Needs qw( Pithub );
my $pi = source2pi(
'test-data/pithub.pl',
'use Pithub;',
);
is(
$pi->formatted_ppi_statement,
'use Pithub ();',
'removes implicit export for Moo OO class'
);
done_testing();