package Math::Simple; $VERSION = '1.23'; use base 'Exporter'; @EXPORT_OK = qw(add subtract); use strict; use Inline C => 'DATA', VERSION => '1.23', NAME => 'Math::Simple'; 1; __DATA__ __C__ int add (int x, int y) { return x + y; } int subtract (int x, int y) { return x - y; }