{ foreach my $sservice (qw(imap imaps pop3 pop3s)) { $DB->set_prop($sservice, "type", "configuration") if ${$sservice}{type} eq "service"; } # drop dovecot SSLv2 SSLv3 TLSv1 TLSv1.1 TLSv1.2 and move to ssl_min_protocol # drop dovecot dh foreach my $prope (qw( SSLv2 SSLv3 TLSv1 TLSv1.1 TLSv1.2 dh )) { $DB->get_prop_and_delete('dovecot', $prope) if (exists $dovecot{$prope}); } }