perl 三角函数运算

Perl 中可以使用 `sin`、`cos`、`tan`、`asin`、`acos` 和 `atan` 函数来进行三角函数运算。

例如，计算正弦值：

use strict;
use warnings;

my $angle = 45;
my $sin_value = sin($angle * atan2(0, -1) / 180);

print "sin($angle) = $sin_value\n";

输出结果为：

sin(45) = 0.707106781186548

其中，`atan2(0, -1)` 返回的是 π 的值，将角度转换为弧度后再进行运算。

其他三角函数运算同理，只需要将函数名替换即可。