$istrue or do { print "this is bad"; next; };