#1 30. April 2008 Hallo, ich bin gerade dabei ein Perl Script zu installieren. Das Script ist eine Art Datenbank, die auf einem Webserver laufen soll und über den Browser darauf zugegriffen werden kann. Mein Problem ist das die HTML Tags für die Formatierung nicht ausgeführt werden, sondern nur im Klartext angezeigt werden. {bild-down: http://imageshack.us/a/img212/6125/screenshotqr0.jpg} Installiert ist Apache 2.2.8, Embperl 2.2.0, Perl 5.8.8, mod_perl 2.0.3, PHP 2.2.0 und die benötigten Perl Module. Betriebssystem ist Ubuntu 8.04. liegt es an den Apache Einstellungen oder am Perl Script selber? Vielleicht hat jemand eine Idee... MFG Schnuff + Multi-Zitat Zitieren
#2 30. April 2008 AW: [Perl] Im Script wird einige HTML Tags nicht ausgeführt hast du den content-type angegeben? Code: print "Content-type: text/html"; --- btw: PHP 2.2.0 wtf? + Multi-Zitat Zitieren
#3 30. April 2008 AW: [Perl] Im Script wird einige HTML Tags nicht ausgeführt poste doch mal den quelltext der seite, die bei dirm um browser ankommt. + Multi-Zitat Zitieren
#4 1. Mai 2008 AW: [Perl] Im Script wird einige HTML Tags nicht ausgeführt @Murdoc mit print funktioniert es irgendwie nicht. Content Type wird auch wieder im Klartext ausgegeben. Vielleicht kannst du ja was mit dem Quelltext anfangen? @myth2806 Hier der Quelltext den der Browser mir anzeigt HTML: <HTML><HEAD> <link rel=stylesheet type="text/css" href="./sndb.css"> </HEAD> <script language="JavaScript"><!-- function querydelete(url) { if (confirm("Really delete this entry")) {;location.href=url;} } //--></script> <BODY> <TABLE CELLSPACING=0 CELLPADDING=1 BORDER=0 HEIGHT=100% WIDTH=100%> <TR><TD BGCOLOR=#444444 ALIGN=left> <FONT>Samplenumber Database</FONT> <FONT></FONT> <TD BGCOLOR=#444444 ALIGN=right> <a href="http://localhost/sndb/adm.epl?mode=login"><FONT>Login</FONT></A> <a href="http://localhost/sndb"><FONT>Home</FONT></A> <TR><TD COLSPAN=2 ALIGN=center VALIGN=top HEIGHT=100%><BR> <form METHOD="POST" action="http://localhost/sndb/adm.epl"> <FONT id=db>Name: </FONT> <input type="INPUT" name="name" value="" SIZE=16 id=d> <FONT id=db>Password: </FONT> <input type="PASSWORD" name="passwd" value="" SIZE=16 id=d> <input type="SUBMIT" value="Login" id=bb> <input type="HIDDEN" name="mode" value="verifylogin"> </FORM> </TD></TR> <TR><TD BGCOLOR=#444444 ALIGN=left> <FONT COLOR=sandybrown>0 Samples in DB</FONT> </TD><TD BGCOLOR=#444444 ALIGN=right> </TD></TR></TABLE></BODY></HTML> Und hier ein Auszug aus der Perl Datei: Code: [$ sub head $] [- $title=shift;$subtitle=shift; -] <HTML><HEAD> <link rel=stylesheet type="text/css" href="./sndb.css"> </HEAD> <script language="JavaScript"><!-- function querydelete(url) { if (confirm("Really delete this entry")) {;location.href=url;} } //--></script> <BODY> [+ "<TABLE CELLSPACING=0 CELLPADDING=1 BORDER=0 HEIGHT=100% WIDTH=100%>" +] [+ "<TR><TD BGCOLOR=#444444 ALIGN=left>" +] <FONT>[+ $title +]</FONT> <FONT>[+ $subtitle +]</FONT> [+ "<TD BGCOLOR=#444444 ALIGN=right>" +] [$ if ($udat{user}) $] [$ if ($ENV{SCRIPT_FILENAME}=~/display.epl/ && $fdat{id}=~/\d+/) $] <A HREF="javascript:querydelete ('[+$BASE+]/edit.epl?mode=delete&id=[+$fdat{id}+]')"> <FONT>Delete</FONT></A> <A HREF="[+$BASE+]/edit.epl?mode=edit&id=[+$fdat{id}+]"> <FONT>Edit</FONT></A> <A HREF="[+$BASE+]/edit.epl?mode=clone&id=[+$fdat{id}+]"> <FONT>Clone</FONT></A> [$ endif $] <A HREF="[+ $BASE +]/edit.epl?mode=new"><FONT>New</FONT></A> <A HREF="[+ $BASE +]/adm.epl?mode=passwd"><FONT>Password</FONT></A> <A HREF="[+ $BASE +]/adm.epl?mode=logout"><FONT>Logout</FONT></A> [$ endif $] <A HREF="[+ $BASE +]/adm.epl?mode=login"><FONT>Login</FONT></A> <A HREF="[+ $BASE +]"><FONT>Home</FONT></A> [+ "<TR><TD COLSPAN=2 ALIGN=center VALIGN=top HEIGHT=100%><BR>" +] [$ endsub $] [$ sub foot $] [+"</TD></TR>"+] [+ "<TR><TD BGCOLOR=#444444 ALIGN=left>" +] [- $dbh=&connect($DB); $sth=&sqlprepare($dbh,"SELECT COUNT(*) AS n FROM sn"); $sth->execute;$n=${$sth->fetchrow_hashref()}{n}; -] <FONT COLOR=sandybrown>[+$n+] Samples in DB</FONT> [+ "</TD><TD BGCOLOR=#444444 ALIGN=right>" +] [$ if ($udat{user}) $] <FONT COLOR=sandybrown>User: </FONT> <FONT COLOR=sandybrown>[+ $udat{user} +]</FONT> [$ endif $] [+ "</TD></TR></TABLE></BODY></HTML>"+] [$ endsub $] + Multi-Zitat Zitieren
#5 2. Mai 2008 AW: [Perl] Im Script wird einige HTML Tags nicht ausgeführt ich kenn mich mit perl leider nicht aus aber es scheint daran zu liegen, dass wenn du mit Code: [+ "xxx" +] versuchtst irgendwas auszugeben, dass das nicht funkt... kannst du den html-quelltext nicht einfach wie Code: <HTML><HEAD> <link rel=stylesheet type="text/css" href="./sndb.css"> </HEAD> <script language="JavaScript"><!-- function querydelete(url) { if (confirm("Really delete this entry")) {;location.href=url;} } //--></script> diesen teil ausgeben? das funkt ja greez myth + Multi-Zitat Zitieren