12.19 Inline::CでCの拡張モジュールを書く

Perlから呼び出すことができる関数をCで書きたい。

• CPANで入手できるInline::Cモジュールを使用する

use Inline::C;
$answer = somefunc(20, 4);
print "$answer\n";
__END__
__C__
double somefunc(int a, int b) {    /* Inlineは基本的なCの型の大半を認識する。  */
  double answer = a * b;
  return answer;
}