CGI.pm gibt mir die Seite nicht richtig aus (Perl/CGI)

[thread]100[/thread]

CGI.pm gibt mir die Seite nicht richtig aus

SirLant

2003-11-23 14:37

User since
2003-08-04
516 Artikel
BenutzerIn
[default_avatar]

Ich wollte für meine zukünftige Seite www.programminghints.de
nen Vorabdesign machen, bis das richtige steht, da das derzeitige
nen Witz ist.
Dachte mir den Aufbau so:

Code: (dl )

_
|Zelle1  |              Zelle2 mit banner         |
|---------------------------------------  |
|Zelle3  |           CONTENT                      |
|Navibar|                                              |
|-----------------------------------------|

Nun möchte ich natürlich CGI.pm verwenden und Style-Sheets
also die Hintergrundfarbe funktioniert, die Farbe für die Zell3
jedoch bereits nicht mehr außerdem wird das Banner nicht angezeigt
obwohl es im gleichen Ordner liegt wie die index.cgi

Hier mal mein Code:

Code (perl): (dl )

#!e:/programme/perl/bin/perl.exe -w
# Gästebuch

use strict;
use warnings;
use lib qw%.%;
use CGI::Pretty qw %:standard%;
use CGI::Carp qw %fatalsToBrowser%;
use WebDB;

my $page =  start_html(-title=>'programminghints.de',
                                                                -author=>'webmaster@programminghints.de',
                                                                -base=>'true',
                                                                -target=>'_blank',
                                                                -meta=>{'keywords'=>'java perl programming programmieren tipps tipp hint algorithmen',
                                                                                          'copyright'=>'copyright 2003 Sascha Friedmann'},
                                                                -style=>{'src'=>'/styles/standard.css'}
                                                                );
                                                                
$page .= table (
                                        Tr (    #Links oben
                                                td ("Seite im Aufbau"),
                                                td (), #Abstand
                                                #Rechts oben
                                                td ({-bgcolor => "silver"},img ({src=>"cgi-bin/banner1.jpg",align=>"left", alt=>"Text"}))
                                        ),
                                        Tr (    td ({-colspan => "3"})), #Abstandzeile
                        
                                        Tr (    #Links unten: Navigation
                                                td ({-class => "table", -align => "left", -valign => "top"},
                                                         "foo","baar"
                                                         ),
                                                td (), #Abstand
                                                #Rechts unten: Inhalt
                                                td ({-align => "left", -valign => "top"}, '$content')
                                        )
                        );#table
print header(),$page;

Die CSS-Datei:
[html]body {background-color: #E0E0E0}
A:link {text-decoration: none; color: #000000}
A:visited {text-decoration: none; color: #000000}
A:active {text-decoration: none; color: #000000}
A:hover {text-decoration: none; color: red}
.table {background-color: #006699}
[/html]

Es wird statt dem Bild der alternative Text ausgegeben und
die Zelle3 bleibt einfach in der Hintergrundfarbe.
Habe als Attribut -style versucht und -class, -style ergbit
style = "" und -class class = "" und letzteres müsste ja funktionieren.

Bin echt ratlos :(

Edit:
Schade das code und perl tag ruinieren beide die Einrückung :(

Edit:
Das Problem mit der Farbe hab ich gelöst, ich wusste doch, dass
es mich verwirren wird wenn ich die standard.css noch in den
cgi-bin Ordner packe :D

Aber das Bild kommt immernoch nicht :(

Edit:

Ok, also wenn ich das Bild nach /banner1.jpg lege wird es angezeigt.

Meine Ordnerstruktur sieht so aus:
e:\WWW
-cgi-bin
-root

e:\www\root ist mein Standardverzeichnis, wenn ich dort das
Bild ablege und mit /banner1.jpg anzeigen lasse geht es
mit cgi-bin/banner1.jpg jedoch nicht.
Woran liegt das?

Werde die Bilder zwar später auch nicht in mein cgi-bin legen
aber würde es gerne wissen :)\n\n

--Programming today is a race between Software Enginers striving to build bigger and better idiot-proof Programs,
and the Universe trying to produce bigger and better idiots.
So far, the Universe is winning!

KKO

2003-11-23 15:38

User since
2003-11-05
124 Artikel
BenutzerIn

user image

../cgi-bin/banner1.jpg oder am besten gleich vollständigen Pfaden arbeiten :-)

Gruß
KKO

format_c

2003-11-23 18:01

User since
2003-08-04
1706 Artikel
HausmeisterIn

Speicher das Bild außerhalb von cgi-bin

Wenn der Apache richtig konfiguriert ist, sollte keine Bilder "ausgeführt" werden dürfen außer .cgi oder gar .pl

Gruß Alex

Effizente Linuxshell

havi

2003-11-24 14:50

User since
2003-08-04
2036 Artikel
BenutzerIn

[quote=KKO,23.11.2003, 14:38]../cgi-bin/banner1.jpg oder am besten gleich vollständigen Pfaden arbeiten :-)[/quote]
... oder am besten gleich mit dem Modul

Code: (dl )

FindBin

arbeiten.

Gruss

*ZuStratRueberGrins*

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

format_c

2003-11-24 14:58

User since
2003-08-04
1706 Artikel
HausmeisterIn

@havi: Hat das einen besonderen Grund, dass du immer zwei mal postest inl. PM?

Gruß Alex

Edit: MMh warscheinlich, weil die Antwort vom Server so ewig dauert.\n\n

Effizente Linuxshell

havi

2003-11-24 15:00

User since
2003-08-04
2036 Artikel
BenutzerIn

@format_c: Werde das gleich bereinigen.

Hatte Probleme mit meinem Internet-Explorer! Sorry!

Gruss

Edit: Bereinigt!\n\n

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

2003-11-24 15:11

User since
2003-08-04
467 Artikel
HausmeisterIn

[quote=havi,24.11.2003, 14:00]Hatte Probleme mit meinem Internet-Explorer! Sorry![/quote]
Ha, eine klassische Tautologie! :p

Jö*Endlich mal eine direkt erkannt!*rg

Dresden Perlmongers

View all threads created 2003-11-23 14:37.