IT 공부 log/문법 case study

[perl/문법] 소수점 자르기 / 소수점 버림 / 랜덤 함수 / rand()

lullulullu 2021. 11. 11. 15:31

 

CASE STUDY:

랜덤으로 15.5~ 17.5 사이의 실수를 소수점 2자리로 생성하고 싶은 경우 (소수점 버림)

 

$random_real = (rand(2)) + 15.5 ;                       # 15.5 부터 +2 (=17.5) 사이의 실수를 랜덤 생성
$random_final = (int($random_real*100)/100) ;      # 소수점 2자리는 실수*100 한 값을 정수화 한 후, 다시 나누기 100
 
print "$random_real => $random_final \n";          # 출력하는 함수 15.678930214 => 15. 67

 

 

* perl은 ceil(), floor(), round() 등의 함수를 지원하지 않는다.

  ceil(): 소수점 이하 무조건 올림

  floor(): 소수점 이하 무조건 버림

  round(): 소수점 이하 반올림

* 따라서 소수점을 자르고 싶은 경우, int 를 사용하여 필요한 자리수 만큼 정수화 하는 방법 사용

 

* rand(a) 함수는 0~a 사이의 실수를 랜덤 생성한다. ( a 미만 )

* 따라서 0이 아닌 다른 수(b)로 시작하는 랜덤 범위를 지정하고 싶은 경우 + b 를 해준다.

 

 

 

728x90