($A,$B,$C,$D)=glob<>; print abs($A-$C)+abs($B-$D)<=3?1:2,$/