Opened by Gast at 2006-12-15 20:40
Hallo
ich moechte mit einem Perl-Script eine einfache Ausgabe "df -k" auf dem Server ausfuehren, der mir dann anzeig, wie die Plattenbelegung ist
Ich habe es so gemacht - da kommt aber alles unformatiert in den Browser - was mache ich falsch - Bin Neuling ...
(use strict ist auskommentiert, sonst geht gar nichts ...)
---------------------------------------------------------
#!/usr/bin/perl -w
#use strict;
use CGI::Carp qw(fatalsToBrowser);
$ausgabe= system "df -k \n";
print "Content-type: text/html\n\n";
print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">', "\n";
print "<html><head><title>Plattenplatz</title>\n";
print "</head><body>\n";
print "$ausgabe\n";
print "</body></html>\n";
ich moechte mit einem Perl-Script eine einfache Ausgabe "df -k" auf dem Server ausfuehren, der mir dann anzeig, wie die Plattenbelegung ist
Ich habe es so gemacht - da kommt aber alles unformatiert in den Browser - was mache ich falsch - Bin Neuling ...
(use strict ist auskommentiert, sonst geht gar nichts ...)
---------------------------------------------------------
#!/usr/bin/perl -w
#use strict;
use CGI::Carp qw(fatalsToBrowser);
$ausgabe= system "df -k \n";
print "Content-type: text/html\n\n";
print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">', "\n";
print "<html><head><title>Plattenplatz</title>\n";
print "</head><body>\n";
print "$ausgabe\n";
print "</body></html>\n";