$regexp = ...;
if($value !~ /$regexp/)
  { $err .= "wrong value ($value)" }