#!perl -apl @F=sort@F;$_=$F[2]<$F[0]+$F[1]?1:0