use warnings; use Inline C => Config => BUILD_NOISY => 1; use Inline C => <<'EOC'; SV * foo() { SV * y = newSViv(42); SvREFCNT_dec(y); return y; } EOC foo();