From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

use Test'More tests => 1;
# [rt.cpan.org #108645]
eval {
my $scripter = WWW::Scripter->new;
$scripter->use_plugin('JavaScript');
$scripter->eval("var t = false;");
die "Fatality!\n";
};
is $@, "Fatality!\n", 'destructors do not clobber $@';