Testsuite: perl version oddity

[exim.git] / test / scripts / 5709_dnsdb_events / 5709

diff --git a/test/scripts/5709_dnsdb_events/5709 b/test/scripts/5709_dnsdb_events/5709
index 03ca7ed62cac21b5998566bc21d5381f3049cebc..583df5f1ae638f26c765ad036f5de1de1ad2e788 100644 (file)
--- a/test/scripts/5709_dnsdb_events/5709
+++ b/test/scripts/5709_dnsdb_events/5709
@@ -1,8 +1,19 @@
 # event on dnsdb lookup fail
-
-exim -be
-bad_a                  ${lookup dnsdb{a=nonexistent.test.ex}{$value}{FAIL}}
-badcname               ${lookup dnsdb{a=badcname.test.ex}{$value}{FAIL}}
-defer                  ${lookup dnsdb{a=test.again.dns}{$value}{FAIL}}
-good                   ${lookup dnsdb{txt=test.ex}{$value}{FAIL}}
+#
+exim -bd -DSERVER=server -oX PORT_D
 ****
+client 127.0.0.1 PORT_D
+??? 220
+HELO nonexistent.test.ex
+??? 250
+HELO badcname.test.ex
+??? 250
+HELO test.again.dns
+??? 250
+HELO localhost
+??? 250
+QUIT
+??? 221
+****
+killdaemon
+no_stderr_check