Sunday, August 20, 2006
Perl/펄] 랜덤(난수;Random)/무작위한 숫자 출력 함수 - rand - srand
무작위로 정수 출력 예제
#!/usr/bin/perl
use strict; use warnings;
### 0~9까지의 랜덤한 정수를 출력
print int(rand(10)), "\n";
use strict; use warnings;
### 0~9까지의 랜덤한 정수를 출력
print int(rand(10)), "\n";
rand(10) 으로는
9.4976806640625
6.02752685546875
0.0225830078125
5.47760009765625
9.89288330078125
1.61102294921875
이런 실수들을 반환하는데, int 함수를 사용해 실수부를 제거했습니다. 따라서 0~9까지의 정수가 얻어집니다.
int(rand(100))
으로는 0~99까지의 숫자가 무작위로 나옵니다.
10~20까지의 랜덤한 정수 출력하기
print int(rand(11)) + 10, "\n";
srand() 함수
버전 5.004 이전의 오래된 펄에서는, rand() 함수 앞에 이렇게
srand();
를 배치해야 합니다. 요즘의 펄에서는 자동으로 srand()가 호출되기에 적어주지 않아도 됩니다. 낡은 유닉스 머신에는 아직도 v5.0 정도의 펄이 설치되어 있을 것입니다.
srand()는, rand()함수를 위한 씨앗값을 만들어주는 것입니다.
지정한 범위 내에서만 난수 구하기: ▶▶ Perl/펄] 특정 범위의 숫자(정수) 랜덤 출력: Random Range Min Max (rand)
▶▶ Perl 펄] 32비트 16진수 헥사(Hex) 난수; 32bit 2진수 Random(랜덤) 발생 함수
tag: perl
Perl | 펄
<< Home