Testsuite: revert some of the modernish Perl constructs
[exim.git] / test / aux-fixed / 0037.f-6
1 # Exim filter
2
3 if $h_subject: is "This is a very long string which isn't likely to occur when\
4   testing for a fixed string, but might happen if a long and complicated\
5   regular expression and/or lookup gets used in somebody's filter file.\
6   Originally the limit was 256 characters, but now we have increased it to\
7   a larger figure. This should exceed the old limit and check that the new\
8   limit is in place."
9 then
10   testprint "Won't happen"
11 endif