포인트 분수를 저급 분수로 변환하는 방법?

Question

perl에서 저급 분수로 소수점을 변환하는 방법은 무엇입니까? 모든 예제/모듈?

Answer 1

보로딘이 언급 한 수학 :: 분수 외에도 Number::Fraction있다. Perl에서의 오버로드의 아름다운 예입니다. 더 자세히 살펴보고 직접 구현하려고한다면 a good introduction to overloading at perl.com

Answer 2

를 살펴보십시오.

use strict; 
use warnings; 

use Math::Fraction; 

my $frac = frac(.666); 
print $frac * frac(3/4); 

OUTPUT

1/2