<>=~$";$a=$`+1e9;$b=$'+1e9; $c=chop$a,$d=chop$b,$f=($c.$d==47)-($c.$d==74)||$c-$d||$f while$a; print$f>0?$`:$';