warn 'everyone' and exit('ASAP') if ($Rita->category > 3) and ($monk{'location'} =~ /Gulf Coast/);