print $a.(qw(< == >))[1+eval{($a-$b)/abs($a-$b)}].$b,$/;