use constant ENABLE_DEBUG => 0; sub debug { print $_[0]; } debug 'test' if ENABLE_DEBUG;