summaryrefslogtreecommitdiff
path: root/regress/simulation/emul_error.sh
blob: 532c7f87f58f8801ffbbb836cfe3e2192c82b92a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
#!/bin/sh
#
# $FML: emul_error.sh,v 1.1 2002/11/25 14:30:57 fukachan Exp $
#

DO () {
   (
	pwd=`pwd`
	cd ../.. || exit 1
	pwd

	test -f $msg || return;

	regress/message/scramble.pl $msg |\
	${PERL:-perl} -w /usr/local/libexec/fml/error elena@home.fml.org

	echo "-- exit code: $?"
   )
}

if [ "X$*" != X ];then
	list=$*
else
	pwd=`pwd`
	list=$pwd/../errormails/postfix19991231
fi

for msg in $list
do
   DO $msg
done

printf "\n\n" ; fml elena error

exit 0