Perl/펄] 제곱근 함수, 루트 근사값 계산 방법, 음수의 제곱근 구하기; Root Negative Number

#!/usr/bin/perl
use strict; use warnings;

  my $result = sqrt(2);
  print $result, "\n";
  # 출력 결과: 1.4142135623731
  # 루트 2는 당연히 1.41... 입니다.




# 음수의 제곱근 구하기

use Math::Complex;

  print sqrt(-1), "\n";
  # 출력 결과: i
  # 허수 단위인 i(아이)가 나옵니다.

  print sqrt(-2), "\n";
  # 출력 결과: 1.4142135623731i
  # 1.41... 끝에 허수 단위인 i가 붙어 있습니다.