Testsuite: revert some of the modernish Perl constructs

[exim.git] / test / stderr / 0371

diff --git a/test/stderr/0371 b/test/stderr/0371
index 5f97d4e09eb97099acc672f020d668aecf181e85..1cdf00177a9306c8fb7091bb3b5c9317b446b3a5 100644 (file)
--- a/test/stderr/0371
+++ b/test/stderr/0371
@@ -44,6 +44,8 @@ SMTP>> 250-mail.test.ex Hello something [V4NET.0.0.0]
 250-PIPELINING
 250 HELP
 SMTP<< mail from:<x@y>
 250-PIPELINING
 250 HELP
 SMTP<< mail from:<x@y>

+spool directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100 msg_size = 0
+log directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100

 using ACL "mail"
 processing "accept"
 check set acl_c0 = $acl_c0; mail
 using ACL "mail"
 processing "accept"
 check set acl_c0 = $acl_c0; mail


@@ -121,6 +123,8 @@ LOG: MAIN
   VRFY failed for x@y H=(something) [V4NET.0.0.0]
 SMTP>> 550 <x@y> Unrouteable address
 SMTP<< mail from:<x@y>
   VRFY failed for x@y H=(something) [V4NET.0.0.0]
 SMTP>> 550 <x@y> Unrouteable address
 SMTP<< mail from:<x@y>

+spool directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100 msg_size = 0
+log directory space = nnnnnK inodes = nnnnn check_space = 10240K inodes = 100

 using ACL "mail"
 processing "accept"
 check set acl_c0 = $acl_c0; mail
 using ACL "mail"
 processing "accept"
 check set acl_c0 = $acl_c0; mail