$subref = ...;
if(! &$subref($value))
  { $err .= "wrong value ($value)" }