http://www.perlmonks.org?node_id=1006455


in reply to Re^2: Determining if a rational number terminates
in thread Determining if a rational number terminates

Thanks for your suggestions. Here is a yet shorter version:
use bigrat;print+(1e1000/pop()*pop)=~"/"?N:Y,$/


When's the last time you used duct tape on a duct? --Larry Wall