Fax Status History (Admin-Queue)

#!/usr/bin/perl use CGI; $query = new CGI; umask 007; $user = $query->remote_user(); $http_home = "/home/mha/public_html/server"; $fax_home = "$http_home/fax"; $home = "$fax_home/admin"; $dbfile = "$home/incoming-db"; $file = $query->param('file'); print $query->header; print < Fax Status History (Admin-Queue)

EOF ; print "Nutzer: $user | Persönl. Einstellungen | FaxHome | Inbox"; print "

Fax-Status History (Administrator Incoming Queue):

";
print `cat $home/$file.log`;
print "

\n"; print "

\nChemnitz FaxServer; ",`date`,"

\n"; print "

\n"; print "";