#!perl -nlp split;$a=($_[0]>$_[1]?">":$_[0]<$_[1]?"<":"=");s/ / $a /