1use warnings; 2use strict; 3 4use Test::More tests => 1; 5 6use XS::APItest qw(stufftest); 7 8my $a = "stufftest+;();"; 9eval $a; 10is $a, "stufftest+;();"; 11 121; 13