for A; do
	case "$A" in
	*@*)
		HOST="${A#*@}"
		A="${A%@*}"
		A="$A-unsubscribe@$HOST"
		;;
	*)
		A="$A-unsubscribe"
		;;
	esac
	echo unsubscribe | mail $A
	echo sent mail to $A
done