view release on metacpan or  search on metacpan

t/lib/App/SocialSKK/Test.pm  view on Meta::CPAN

my @goodies = qw(
    Test::More
    Test::Exception
    App::SocialSKK::Test::Spec
);

sub import {
    my $class = shift;
    require strict;
    strict->import;
    require warnings;
    warnings->import;
    require utf8;
    utf8->import;

    my $caller = caller;
    unless ($caller eq $class) {
        no strict 'refs';
        push @{$caller . ":\:ISA"}, $class;
    }