view release on metacpan or  search on metacpan

lib/HTML/Blitz/pragma.pm  view on Meta::CPAN

no if _HAVE_PERL_5_32, feature => 'indirect';
use Function::Parameters 2;

use Carp ();

method import($class: @items) {
    for my $item (@items) {
        Carp::croak qq("$item" is not exported by the $class module);
    }

    strict->import;
    warnings->import(qw(all FATAL uninitialized));
    warnings->unimport(qw(experimental::postderef)) unless _HAVE_PERL_5_24;
    feature->import(':' . PERL_VERSION, 'postderef');
    feature->unimport('indirect') if _HAVE_PERL_5_32;
    Function::Parameters->import;
}

1