use v6-alpha;
use Test;
plan(2);
unless try({ eval("1", :lang<perl5>) }) {
skip_rest;
exit;
}
{
lives_ok {
eval q|
use perl5:CGI;
my $q = CGI.new;
is $q.isa(CGI), 1, "Correct isa";
|
or die $!;
}, "perl5:CLASS.new";
}