use bigrat;$m=<>;$_/=840,/\/|$/,$'>$m||print$_,"/1"x!$',$/for 0..840