if (do {no warnings 'numeric'; $foo < 4.556}) { ... }