#!/usr/bin/perl use CGI; $query = new CGI; $user = $query->remote_user(); $home = "/home/mha/public_html/server/fax/$user"; if ($query->param('action') eq "true") { } else { } open (SETUP, "<$home/setup"); while () { SWITCH: /^NAME:(.*)/ && do {$name=$1;}; /^PHONE:(.*)/ && do {$phone=$1;}; /^FAX:(.*)/ && do {$fax=$1;}; /^EMAIL:(.*)/ && do {$mail=$1;}; } print $query->header; print < Lokales File als Fax versenden
         Nutzer: $user | Persönl. Einstellungen | FaxHome | Sende Mitteilung | Sende Datei | Inbox

Lokales File als Fax versenden


  • Funktioniert nur mit Netscape ab Version 2.0, da andere Browser die Möglichkeit zum File-Upload noch nicht implementiert haben (und nicht mit der HP-UX Version, die ist buggy).
  • Den browse-Knopf drücken um eine Datei auszuwählen (per Auswahlbox).
  • Nur Text- oder Postscript-Dateien senden, alles andere geht nicht!
  • Postscript Dateien kann man z.B. dadurch erzeugen, daß man die Druckausgabe für einen Postscriptdrucker in eine Datei umleitet, was von Windows im Druckdialog angeboten wird.

Email Adresse: (für Nachrichten vom Fax-Server, wichtig!)

Von:

Name: Tel.-Nr.: Fax-Nr:

An:

Fax-Nr: (Mit '0' für Amt) Name: Firma: Betrifft: Kommentar (Die Eingabe wird als eine Zeile behandelt und automatisch umgebrochen): Welches File (inkl. Pfad):

EOF ; close(SETUP);