if (! &valid_foozle_input($wozzle)) {

##</code><code>##

if ($wozzle =~ /extensive-perl-regexp-line-noise-here/ {