} else { open FILE, "$ENV{DOCUMENT_ROOT}/cgi-bin/retusche_abgeschlossen.htm"; print $_ while ; close FILE; $params{address} == 1 ? $params{address} = 'Frau' : $params{address} = 'Herr'; $params{light} = 'Ja' if $params{light} == 1; $params{light} = 'Nein' if $params{light} == 2; $params{light} = 'Wenn empfohlen' if !$params{light}; $params{contrast} = 'Ja' if $params{contrast} == 1; $params{contrast} = 'Nein' if $params{contrast} == 2; $params{contrast} = 'Wenn empfohlen' if !$params{contrast}; $params{color} = 'Ja' if $params{color} == 1; $params{color} = 'Nein' if $params{color} == 2; $params{color} = 'Wenn empfohlen' if !$params{color}; open MAIL, "| /usr/sbin/sendmail -t"; print MAIL "To: ***\@***\n"; print MAIL "From: ***\@***\n"; print MAIL "Subject: Ein neuer Retuscheauftrag ist eingegangen!\n"; print MAIL "\nAuftraggeber: $params{address} $params{firstname} $params{lastname}\n\n"; print MAIL "Anschrift:\n"; print MAIL "----------\n"; print MAIL "$params{addressline}\n"; print MAIL "$params{zip} $params{city}\n\n"; print MAIL "Festnetz: $params{phone}\n" if $params{phone}; print MAIL "Handynummer: $params{mobile}\n" if $params{mobile}; print MAIL "Der Auftraggeber" if $params{address} eq 'Herr'; print MAIL "Die Auftraggeberin" if $params{address} eq 'Frau'; print MAIL " hat folgende Wünsche:\n"; print MAIL "--------------------------------------\n"; print MAIL "Belichtungskorrektur: $params{light}\n"; print MAIL "Kontrastkorrektur: $params{contrast}\n"; print MAIL "Farbkorrektur: $params{color}\n\n"; print MAIL "Weiterhin wurden folgende Bemerkungen hinterlassen:\n---------------------------------------------------\n$params{comment}" if $params{comment}; print MAIL "\nEs wird um Rückruf gebeten!\n" if $params{rcall} && $params{phone}; print MAIL "\n\nAbschluss Auftragsformular\n"; close MAIL; }