Exim version x.yz ....
configuration file is TESTSUITE/test-config
admin user
- ┌considering: ${perl{foo}{arg1}}
- ┌considering: foo}{arg1}}
+dropping to exim gid; retaining priv uid
+ ╭considering: ${perl{foo}{arg1}}
+ ╭considering: foo}{arg1}}
├──expanding: foo
- â\94\94─────result: foo
- â\94\8cconsidering: arg1}}
+ â\95°─────result: foo
+ â\95considering: arg1}}
├──expanding: arg1
- â\94\94─────result: arg1
+ â\95°─────result: arg1
Starting Perl interpreter
├──expanding: ${perl{foo}{arg1}}
- â\94\94─────result: Subroutine foo called with args: arg1
- â\94\8cconsidering: ${perl{foo_undef}}
- â\94\8cconsidering: foo_undef}}
+ â\95°─────result: Subroutine foo called with args: arg1
+ â\95considering: ${perl{foo_undef}}
+ â\95considering: foo_undef}}
├──expanding: foo_undef
- â\94\94─────result: foo_undef
+ â\95°─────result: foo_undef
├failed to expand: ${perl{foo_undef}}
├───error message: Perl subroutine "foo_undef" returned undef to force failure
- â\94\94failure was forced
- â\94\8cconsidering: ${perl{debug_write}{debug from Perl\n}}
- â\94\8cconsidering: debug_write}{debug from Perl\n}}
+ â\95°failure was forced
+ â\95considering: ${perl{debug_write}{debug from Perl\n}}
+ â\95considering: debug_write}{debug from Perl\n}}
├──expanding: debug_write
- â\94\94─────result: debug_write
- â\94\8cconsidering: debug from Perl\n}}
+ â\95°─────result: debug_write
+ â\95considering: debug from Perl\n}}
├──expanding: debug from Perl\n
- â\94\94─────result: debug from Perl
+ â\95°─────result: debug from Perl
debug from Perl
├──expanding: ${perl{debug_write}{debug from Perl\n}}
- â\94\94─────result: Wrote debug
- â\94\8cconsidering: ${perl{log_write}{log from Perl}}
- â\94\8cconsidering: log_write}{log from Perl}}
+ â\95°─────result: Wrote debug
+ â\95considering: ${perl{log_write}{log from Perl}}
+ â\95considering: log_write}{log from Perl}}
├──expanding: log_write
- â\94\94─────result: log_write
- â\94\8cconsidering: log from Perl}}
+ â\95°─────result: log_write
+ â\95considering: log from Perl}}
├──expanding: log from Perl
- â\94\94─────result: log from Perl
+ â\95°─────result: log from Perl
LOG: MAIN
log from Perl
├──expanding: ${perl{log_write}{log from Perl}}
- â\94\94─────result: Wrote log
+ â\95°─────result: Wrote log
>>>>>>>>>>>>>>>> Exim pid=pppp (main: expansion test) terminating with rc=0 >>>>>>>>>>>>>>>>
LOG: smtp_connection MAIN
SMTP connection from CALLER
>>> host in pipelining_advertise_hosts? yes (matched "*")
>>> host in chunking_advertise_hosts? no (end of list)
>>> using ACL "check_rcpt"
->>> processing "accept"
+>>> processing "accept" (TESTSUITE/test-config 20)
LOG: this is a warning at TESTSUITE/aux-fixed/3000.pl line 25.
>>> check condition = ${if !eq {${perl{foo_warn}}}{}}
>>> = true