use strict; use warnings; no warnings 'once'; #### if ($foo) { ... }