unless ($foo = 4) { ... argle blougat blopf ... }