perl如何计算以2为底的对数

小编给大家分享一下perl如何计算以2为底的对数，希望大家阅读完这篇文章之后都有所收获，下面让我们一起去探讨吧！

在perl语言中只提供了以e为底的函数log，而要计算以2为底这样的是没有相关函数的，那怎样计算呢？其实很简单，使用公式转换下就好啦。

如下：

sub log2 {
my $n = shift;
return log($n)/log(2);
}

看完了这篇文章，相信你对"perl如何计算以2为底的对数"有了一定的了解，如果想了解更多相关知识，欢迎关注行业资讯频道，感谢各位的阅读！