Schrift
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
[thread]120[/thread]

Frage: Perl und GDBM unter Linux (Seite 3)



<< |< 1 2 3 >| >> 24 Einträge, 3 Seiten
Tobi
 2003-12-25 02:01
#590 #590
User since
2003-12-23
25 Artikel
BenutzerIn
[default_avatar]
Hab jetzt alles wieder am laufen.

Bis auf den Chat *fg*

kriege aus der access.log folgendes:

192.168.1.11 - - [25/Dec/2003:13:22:06 +0100] "POST /cgi-bin/pc_anmelden.pl/de/lounge HTTP/1.1" 404 303 "http://192.168.1.11:8081/lounge-Chat%20Anmeldung.htm" "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)"

die error.log m,eint dann das:

[Thu Dec 25 13:22:06 2003] [error] [client 192.168.1.11] (2)No such file or directory: script not found or unable to stat: d:/8081_lounge/lounge\n\n

<!--EDIT|Tobi|1072355187-->
Tobi
 2003-12-25 12:29
#591 #591
User since
2003-12-23
25 Artikel
BenutzerIn
[default_avatar]
Bin wieder einen schritt weiter gekommen

bekomme jetzt diese fehlermeldungen in der error.log :

Code: (dl )
[Thu Dec 25 16:20:43 2003] [error] Can't open file http://192.168.1.11:8081/cvs/stella/repository/musicalworld/htdocs/lounge/de/tmpl/pc_neuanmelden.tmpl!


und der Browser zeigt das an:



Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
<HTML><HEAD>
<TITLE>200 OK</TITLE>
</HEAD><BODY>
<H1>OK</H1>
The server encountered an internal error or
misconfiguration and was unable to complete
your request.<P>
Please contact the server administrator,
@@ServerAdmin@@ and inform them of the time the error occurred,
and anything you might have done that may have
caused the error.<P>
More information about this error may be available
in the server error log.<P>
<HR>
<ADDRESS>Apache/1.3.27 Server at tobias Port 8081</ADDRESS>
</BODY></HTML>



Die Datei pc_neuanmelden.tmpl ist mit dem Browser anzeigbar unter der Adresse die die Fehlermeldung  als "Can't open" hat und enthält folgendes:


Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
<HTML>
<HEAD>
<!-- Template: /lounge/de/tmpl/pc_neuanmelden.tmpl -->
<title>@PROJECT@-Chat Anmeldung</title>
<META NAME="description" CONTENT="STELLA ENTERTAINMENT, die ganze Welt der Musicals. Erfahren Sie alles über unsere Musicals, entdecken Sie unsere Theater, stöbern Sie in unserem Online-Shop oder buchen Sie einfach Ihre Tickets online">
<META NAME="keywords" CONTENT="Musical, Stella, Stella AG, Musicals, Stella Musical, Cats, Entertainment, Event, Veranstaltung, Aufführung, Unterhaltung, Abendprogramm, Live-Entertainment, MusicalWorld, Starlight Express, Phantom der Oper, the musical company, Mozart, Hair, Tanz der Vampire, Musicaltheater, Bremen, Fosse, Tabaluga & Lilli, Jekyll & Hyde, Hamburg, Bochum, Stuttgart, Download, Kostenlos, Internet, Online, Urlaub, Stella Academy, Musik, Der Glöckner von Notre Dame, Disney, Berlin, Abendkasse, Vorverkauf, online, Reisen, CD, Gutscheine, Ticket, Urlaub, Live, Liveentertainment, Konzerte, Musical Highlights, Feier, Geburtstag, Hochzeit, Jubiläum, Betriebsfeier, Firmenveranstaltung, Party, Musical Gala, Musiktheater, Schauspiel, Tanztheater, Theater, Ticketservice, Merchandising, Shop, Online-Shop, Tassen, Vampirjagd, Vorstellung, Show, Tanz, Künstler, Musical-Reisen, Backstage, Bühne, Tanzschule, Tänzer, Sänger, Gesang, Souvenirs, Musical Souvenirs, Partnerprogramm, Ensuite-Musical, Broadway, Musical Shop">
<META NAME="author" content="PopNet Kommunikation Hamburg">
     <META NAME="robots" CONTENT="INDEX, FOLLOW">
     <meta name="revisit-after" CONTENT="30 days">
<META http-equiv="PICS-Label" content="(PICS-1.0 "http://www.rsac.org/ratingsv01.html" l gen true comment "RSACi North America Server" by "stella@mail.stella.de" for "http://www.compuserve.de" on "1996.04.04T08:15-0500" exp "1997.07.01T08:15-0500" r (n 0 s 0 v 0 l 0))">
</HEAD>

<body bgcolor="#ffffff" text="#000066" link="#ff0000" vlink="#ff0000" background="/home/graphics/hintergrund.jpg">

<form method=POST action="/lounge/cgi-bin/pc_anmelden.pl/@LANGUAGE@/@PROJECT@">
<input type=hidden name=ctrlID value="@CTRLID@">

<table border=0 width=500 cellpadding=0 cellspacing=0>
<tr>
<td width=35>
<IMG SRC="/general/graphics/dotTrans.gif" BORDER=0 ALT="" WIDTH=35 HEIGHT=1><BR>
</td>
<td align=left valign=top width=100%>
&nbsp;<br>
        <font size="+1" face="arial,helvetica" color="#ff0000">
       <B>Hier treffen Sie neue Freunde der STELLA-Erfolgsmusicals!</B><BR>
       </font>
        <font size="-1" face="arial,helvetica">
&nbsp;<BR>
Beim Chat in der MusicalWorld gibt es keine Beschr&auml;nkungen: Umlaute, Bindestriche und Sonderzeichen - alles ist erlaubt. Einfach eintippen und "abschicken". Alles was Sie brauchen ist, ein Spitzname, unter dem Ihr Beitrag im Chat erscheint (z.B. "Grizabella"), den Standort Ihres Computers (z.B. "Hamburg") und Ihre E-Mail-Adresse.<BR>Wie viele Beitr&auml;ge Sie wie schnell lesen wollen, entscheiden Sie selbst (Unser Tip: Behalten Sie vorerst die Grundeinstellung bei - 10 Statements alle 30 Sekunden). Best&auml;tigen Sie Ihre Angaben mit "Ich bin dabei", und schon k&ouml;nnen Sie sich weltweit, 24 Stunden am Tag, mit anderen Fans und Freunden Ihres pers&ouml;nlichen Lieblingsmusicals unterhalten.
<BR>&nbsp;<BR>
</font>
       </td>
<td width=35>
<IMG SRC="/general/graphics/dotTrans.gif" BORDER=0 ALT="" WIDTH=35 HEIGHT=1><BR>
</td>
    </tr>
</table>

<!-- NewsBlock Start -->
<table border=0 width=500 cellpadding=0 cellspacing=0>
<tr>
<td width=35>
<IMG SRC="/general/graphics/dotTrans.gif" BORDER=0 ALT="" WIDTH=35 HEIGHT=1><BR>
</td>
<td align=left valign=top colspan=2>
<table width=340 border=0 CELLPADDING=4>
<tr>
<td valign=top colspan=2 bgcolor="#000066">
<font size="-1" face="arial,helvetica" color="#ffffff">
<B>Anmeldung:</B><BR>
</font>
<IMG SRC="/general/graphics/dotTrans.gif" BORDER=0 ALT="" WIDTH=1 HEIGHT=5><BR>
</td>
</tr>
<tr>
<td valign=top bgcolor="#cccccc" colspan=2>
<font size="-1" face="arial,helvetica">
<B>Nickname:</B><BR>
@NICKNAME@<P>
<BR>
</font>
<font size="-2" face="arial,helvetica">
<BR>@HINWEIS@
</font>
</td>
</tr>
<tr>
<td valign=top colspan=2 bgcolor="#cccccc">
<font size="-1" face="arial,helvetica">
<B>Ort</B><BR>
@ORT@
</font>
</td>
</tr>
<tr>
<td valign=top colspan=2 bgcolor="#cccccc">
<font size="-1" face="arial,helvetica">
<B>E-Mail</B><BR>
@EMAIL@
</font>
</td>
</tr>
<tr>
<td valign=top colspan=2 bgcolor="#cccccc">
<font size="-1" face="arial,helvetica">
<B>Anzahl der Statements</B><BR>
@NUM_OF_STATEMENTS@
</font>
</td>
</tr>
<tr>
<td valign=top colspan=2 bgcolor="#cccccc">
<font size="-1" face="arial,helvetica">
<B>Aktualisierung alle</B><BR>
@REFRESH_FREQ@
Sekunden
</font>
</td>
</tr>
<tr>
<td valign=top colspan=2>
<font size="-1" face="arial,helvetica" color="#ff0000">
&nbsp;<BR>
<input type=submit value="Ich bin dabei!"></font>
</td>
</tr>
</table>
       </td>
<td width=35>
<IMG SRC="/general/graphics/dotTrans.gif" BORDER=0 ALT="" WIDTH=35 HEIGHT=1><BR>
</td>
    </tr>
</table>

<table border=0 width=500 cellpadding=0 cellspacing=0>
<tr>
<td width=35>
<IMG SRC="/general/graphics/dotTrans.gif" BORDER=0 ALT="" WIDTH=35 HEIGHT=1><BR>
</td>
<td align=left width=520 valign=top>
       <font size="-2" face="arial,helvetica">
<center>
<BR>&nbsp;<BR>
<IMG SRC="/general/graphics/dotRot.gif" BORDER=0 ALT="" WIDTH=430 HEIGHT=1><BR>
&nbsp;<BR>
&copy;&nbsp;Copyright 1998-2001 by STELLA ENTERTAINMENT<BR>
Produced by PopNet Kommunikation GmbH &amp; Co. KG, Hamburg<BR>&nbsp;<BR>
&nbsp;
</center>
</font>
</td>
<td width=35>
<IMG SRC="/general/graphics/dotTrans.gif" BORDER=0 ALT="" WIDTH=35 HEIGHT=1><BR>
</td>
</tr>
</table>

</form>

</body>
</html>



Ich weiß daß noch recht viel "Müll" drinsteht. Ich will da aber eigentlich erst ans löschen gehen wen der Chat mal läuft.\n\n

<!--EDIT|Tobi|1072366127-->
Tobi
 2003-12-25 18:13
#592 #592
User since
2003-12-23
25 Artikel
BenutzerIn
[default_avatar]
wieder ein schrittchen weiter (langsam ernährt sich das Eichhörnchen)


Jetzt hab ich folgenden Error:
Code: (dl )
1
2
[Thu Dec 25 17:07:29 2003] [error] Can't locate DButils.pm in @INC (@INC contains: c:/wampp1/perl/lib c:/wampp1/perl/site/lib . /wampp1/apache/ /wampp1/apache/lib/perl .) at d:/8081_lounge/cvs/stella/repository/musicalworld/htdocs/lounge/cgi-bin/pc_anmelden.pl line 5.
BEGIN failed--compilation aborted at d:/8081_lounge/cvs/stella/repository/musicalworld/htdocs/lounge/cgi-bin/pc_anmelden.pl line 5.


Ich habe auch gar keine datei namens DButil.pm aber eine namens Util.pm

ist das DB ein Befehl oder hat das irgendeine Aufgabe???
meine datei pc_anmelden.pl fängt folgendermaßen an:

Code: (dl )
1
2
3
4
5
6
#!/usr/bin/perl
#
BEGIN { push(@INC, "."); }
use Paths;
use DButils;
require "cgi-lib.pl";


Bei der Paths hatte ich zuerst das selbe, habs dann gefunden und die Paths.pm dann ins Apache kopiert.

Aber wie gesagt mit dem DButils komm ich jetzt nicht weiter.
Tobi
 2003-12-25 20:42
#593 #593
User since
2003-12-23
25 Artikel
BenutzerIn
[default_avatar]
also ich hab die Util.pm jetzt einfach mal DButil.pm benannt.
die Phafsache hab ich auch soweit hingekriegt jetzt mint der es sei ein Fehler in Zeile 15

Code: (dl )
[Thu Dec 25 19:34:53 2003] [error] Undefined subroutine &Apache::ROOTtobias::lounge::cgi_2dbin::pc_anmelden_2epl::ReadParse called at d:/8081_lounge/lounge/cgi-bin/pc_anmelden.pl line 15.


meine Zeile 15 lautet:

Code: (dl )
ReadParse(*FORM);


das ganze basiert auf einem Eintrag in cgi-lib.pl

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
sub ReadParse {
local (*in) = @_ if @_;
local ($i, $key, $val);

# Read in text
if (&MethGet) {
$in = $ENV{'QUERY_STRING'};
} elsif (&MethPost) {
read(STDIN,$in,$ENV{'CONTENT_LENGTH'});
}

@in = split(/[&;]/,$in);

foreach $i (0 .. $#in) {
# Convert plus's to spaces
$in[$i] =~ s/\+/ /g;

# Split into key and value.
($key, $val) = split(/=/,$in[$i],2); # splits on the first =.

# Convert %XX from hex numbers to alphanumeric
$key =~ s/%(..)/pack("c",hex($1))/ge;
$val =~ s/%(..)/pack("c",hex($1))/ge;

# Associate key and value
$in{$key} .= "\0" if (defined($in{$key})); # \0 is the multiple separator
$in{$key} .= $val;

}

return scalar(@in);
}


die ist doch eigentlich eingebunden wenn ich das im Anfang meiner pc_anmelden.pl hab?

Code: (dl )
1
2
3
4
5
6
7
8
9
#!/usr/bin/perl
#
BEGIN { push(@INC, "."); }
use Paths;
use DButils;
#use Utils;
require "cgi-lib.pl";

sub makeRepeats;
<< |< 1 2 3 >| >> 24 Einträge, 3 Seiten



View all threads created 2003-12-23 01:28.