view release on metacpan or  search on metacpan

t/03-package.t  view on Meta::CPAN

#!/usr/bin/perl
use warnings;
use strict;

use Test::More tests => 3;

use FindBin;
use lib $FindBin::Bin;

use My;

BEGIN {
    open *STDIN, '<&', IO::Pty->new
        if ! -t && eval { require IO::Pty };
}

use ARGV::OrDATA qw{ My };