$ perl -le'
    print "gt w str: ",   "b" gt "a"   ? "ok : "XXX";
    print ">  w str: ",   "b" >  "a"   ? "ok : "XXX";

    print "gt w num: ",   16 gt 2      ? "ok : "XXX";
    print ">  w num: ",   16 >  2      ? "ok : "XXX";
'
gt w str: ok
>  w str: XXX   b comes after a, but ">" said otherwise
gt w num: XXX   16 comes after 2, but "gt" said otherwise
>  w num: ok