傳回 EXPR 的餘弦(以弧度表示)。如果省略 EXPR,則取 $_ 的餘弦。
$_
對於反餘弦運算,您可以使用 Math::Trig::acos 函式,或使用此關係式
Math::Trig::acos
sub acos { atan2( sqrt(1 - $_[0] * $_[0]), $_[0] ) }