perl -e 'print "CRAP\n" if ((33.4+33.3+33.3) != 100)' #### perl -e 'print "CRAP\n" if ((33.3+33.3+33.4) != 100)'