The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict; use warnings;
package Acme::Math::XS;
# our $VERSION = 'x.x.x';

use Exporter 'import';
our @EXPORT = qw(
    add
    subtract
);

use Acme::Math::XS::Inline C => <<'...';
long add(long a, long b) {
    return a + b;
}

long subtract(long a, long b) {
    return a - b;
}
...

1;