log関数

「log」関数は自然対数を返します。

log
log([EXPR])

引数に指定した値の自然対数を返します。

パラメータ:
  EXPR  対象の値
戻り値：
  自然対数

1番目の引数には自然対数を求める数値を指定します。省略された場合は変数「$_」が使用されます。指定した数値に対する自然対数が戻り値として返されます。

具体的には次のように記述します。

my $num = log(2);

上記ではeを底とした自然対数を計算します。

※なお任意の値を底とした対数を求める関数は用意されていません。例えば10を底とした対数を求めるには次の計算式を使います。

log(EXPR) / log(10);

サンプルプログラム

では簡単なプログラムで確認して見ます。

test5-1.pl

use strict;
use warnings;
use utf8;
binmode STDIN, ':encoding(cp932)';
binmode STDOUT, ':encoding(cp932)';
binmode STDERR, ':encoding(cp932)';

my $num;

$num = log(2);
print "log(2) = $num¥n";

$num = log(8) / log(2);
print "log2(8) = $num¥n";

上記を「test5-1.pl」の名前で保存します(文字コードはUTF-8です)。そしてコマンドプロンプトを起動し、プログラムを保存したディレクトリに移動してから次のように実行して下さい。

上の計算式はeを底とした対数(自然対数)です。下の計算式は2を底とした対数です。

PerlPlus