my $ref_mail = shift;
my $db_write = @_ ? shift : 1;