($X,$Y)=glob<>; print $X==$Y? 0 :$Y==0? 1 :$X==0? 2 :$X==-$Y? 3 :-1