The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use warnings;
use strict;

use Test::More tests => 1;

use XS::APItest qw(stufftest);

my $a = "stufftest+;();";
eval $a;
is $a, "stufftest+;();";

1;