my( $field, $value )= /((?:[^:\\]+|\\.)*):(.*)/s;