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

#!perl -w
#
# check that .bs files are loaded and executed.
# During build of XS::APItest, the presence of APItest_BS should
# cause a non-empty APItest.bs file to auto-generated. When loading
# APItest.so, the .bs should be automatically executed, which should
# set $::bs_file_got_executed.
use strict;
is $::bs_file_got_executed, 1, "BS file was executed once";
done_testing();