Commit | Line | Data |
---|---|---|
59371ea7 | 1 | # Embedded Perl |
c3161b1d | 2 | munge perl_variants |
59371ea7 PH |
3 | exim -be |
4 | ${perl{foo}} | |
5 | ${perl{foo}{arg1}} | |
6 | ${perl{foo_undef}} | |
7 | ${perl{foo_die}} | |
8 | ${perl{foo_warn}} | |
9 | ${perl{unknown}} | |
10 | ${perl{readvar}{primary_hostname}} | |
11 | ${perl{readvar}{notexists}} | |
12 | ||
13 | ${perl} | |
14 | ${perl{foo}{1}{2}{3}{4}{5}{6}{7}{8}} | |
15 | ${perl{foo}{1}{2}{3}{4}{5}{6}{7}{8}{9}} | |
16 | ||
17 | ${perl{return_scalar}} | |
18 | ${perl{return_list}} | |
19 | ${perl{return_variable_vector}} | |
9d85e46a | 20 | ${sg{${perl{return_hash}}}{\\d+}{X}} |
59371ea7 PH |
21 | |
22 | $tod_full // ${perl{change_locale}} // $tod_full | |
23 | **** | |
24 | exim -d-all+expand -be | |
25 | ${perl{foo}{arg1}} | |
26 | ${perl{foo_undef}} | |
27 | ${perl{debug_write}{debug from Perl\n}} | |
28 | ${perl{log_write}{log from Perl}} | |
29 | **** | |
30 | exim -v -bs | |
31 | ehlo x.y.z | |
32 | mail from:<> | |
33 | rcpt to:<abc@x.y.z> | |
34 | quit | |
35 | **** | |
36 | exim -bh 10.0.0.1 | |
37 | ehlo x.y.z | |
38 | mail from:<> | |
39 | rcpt to:<abc@x.y.z> | |
40 | quit | |
41 | **** | |
42 | exim -DSERVER=server -bd -oX PORT_D | |
43 | **** | |
44 | client 127.0.0.1 PORT_D | |
45 | ??? 220 | |
46 | helo x.y.z | |
47 | ??? 250 | |
48 | mail from:<> | |
49 | ??? 250 | |
50 | rcpt to:<abc@x.y.z> | |
51 | ??? 250 | |
52 | quit | |
53 | ??? 221 | |
54 | **** | |
55 | killdaemon | |
56 | exim -be | |
57 | ${perl{no_warn}} | |
58 | ${perl{foo_warn}} | |
59 | **** | |
60 | no_msglog_check |