Help for this page

Select Code to Download


  1. or download this
    use bigrat;print((shift()*10**1000/shift)=~"/"?N:Y,$/)
  2. or download this
    use bigrat;print[Y,N]->[(shift()*10**1000/shift)=~"/"],$/
  3. or download this
    use bigrat;$_=shift()*10**1000/shift;print[Y,N]->[m"/"],$/