Testsuite: revert some of the modernish Perl constructs

[exim.git] / test / rejectlog / 0562

diff --git a/test/rejectlog/0562 b/test/rejectlog/0562
index d10c450f63d98ac9b47627a816878aa072caca1b..e40415254231e08c39e0b12805ac45ecd8386c10 100644 (file)
--- a/test/rejectlog/0562
+++ b/test/rejectlog/0562
@@ -1,8 +1,7 @@
+
+******** SERVER ********

 1999-03-02 09:44:33 SMTP call from [127.0.0.1] dropped: too many unrecognized commands (last was "unknown")
 1999-03-02 09:44:33 SMTP call from [127.0.0.1] dropped: too many unrecognized commands (last was "unknown")

-1999-03-02 09:44:33 H=[127.0.0.1] rejected VRFY 
-1999-03-02 09:44:33 H=[127.0.0.1] rejected VRFY 
-1999-03-02 09:44:33 H=[127.0.0.1] rejected VRFY 
-1999-03-02 09:44:33 H=[127.0.0.1] rejected VRFY 
+1999-03-02 09:44:33 H=[127.0.0.1] rejected VRFY foo@bar

 1999-03-02 09:44:33 SMTP call from [127.0.0.1] dropped: too many nonmail commands (last was "vrfy")
 1999-03-02 09:44:33 10HmaX-0005vi-00 H=(abcd) [127.0.0.1] F=<userx@test.ex> rejected after DATA
 Envelope-from: <userx@test.ex>
 1999-03-02 09:44:33 SMTP call from [127.0.0.1] dropped: too many nonmail commands (last was "vrfy")
 1999-03-02 09:44:33 10HmaX-0005vi-00 H=(abcd) [127.0.0.1] F=<userx@test.ex> rejected after DATA
 Envelope-from: <userx@test.ex>