Testsuite: revert some of the modernish Perl constructs
[exim.git] / test / aux-var-src / 0472.f
1 # Exim filter
2
3 deliver userz$sn1
4
5 logfile DIR/test-stderr
6
7 logwrite "------- $local_part filter -----------------"
8 logwrite "sn0=$sn0 sn1=$sn1 sn2=$sn2 sn3=$sn3 sn4=$sn4"
9 logwrite "sn5=$sn5 sn6=$sn6 sn7=$sn7 sn8=$sn8 sn9=$sn9"
10
11 # End