File Coverage

blib/lib/List/AllUtils.pm

Criterion	Covered	Total	%
statement	31	31	100.0
branch			n/a
condition			n/a
subroutine	8	8	100.0
pod			n/a
total	39	39	100.0

package List::AllUtils;

use strict;
use warnings;

our $VERSION = '0.19';

use List::Util 1.56      ();
use List::SomeUtils 0.58 ();
use List::UtilsBy 0.11   ();

BEGIN {
    my %skip = (
        'List::Util' => {
            mesh => 1,
            zip  => 1,
        },
    );

    my %imported;
    for my $module (qw( List::Util List::SomeUtils List::UtilsBy )) {
        my @ok = do {
            ## no critic (TestingAndDebugging::ProhibitNoStrict)
            no strict 'refs';
            grep { !$skip{$module}{$_} } @{ $module . '::EXPORT_OK' };
        };

        $module->import( grep { !$imported{$_} } @ok );

        @imported{@ok} = ($module) x @ok;
    }
}

use base 'Exporter';

our @EXPORT_OK = List::Util::uniqstr(
    @List::Util::EXPORT_OK,
    @List::SomeUtils::EXPORT_OK,
    @List::UtilsBy::EXPORT_OK,
);

our %EXPORT_TAGS = ( all => \@EXPORT_OK );

1;

# ABSTRACT: Combines List::Util, List::SomeUtils and List::UtilsBy in one bite-sized package

__END__