Fehler 500 bei Start von CGI Script (Seite 2) (Perl/CGI)

[E|B]

2003-08-29 02:00

User since
2003-08-08
2561 Artikel
HausmeisterIn

[quote=jan10001,28.08.2003, 20:18]Kann es sein das dein Script einen SMTP Server benutzt?[/quote]
Nein!
Jetzt kommt der Witz an der Sache:
Ich habe die ursprüngliche Datei (13,9 KB) namens sendmail.cgi kopiert und einen anderen Namen zugewiesen (datei.cgi). Die neue Datei war nur noch 13,4 KB groß! Was soll ich davon halten?! Da fragt man sich schon ob man bescheuert ist.

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Strat

2003-08-29 02:16

User since
2003-08-04
5246 Artikel
ModeratorIn

was sagt denn perl, wenn du es folgendermaszen in der shell ausfuehrst:

Code: (dl )

perl -c -w scriptname.pl

Laeuft es, wenn du folgenden Perl-Einzeiler drueberlaufen laesst:

Code: (dl )

perl -i.bak -pe 's/\r?//g' scriptname.pl

hast du die rechte auf 755?

hast du vielleicht einen falschen eigentuemer der datei? (root anstelle von wwwrun oder wie auch immer der heisst?: ls -l )

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

Dubu

2003-08-29 03:17

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

[E|B
,29.08.2003, 00:00]
Ich habe die ursprüngliche Datei (13,9 KB) namens sendmail.cgi kopiert und einen anderen Namen zugewiesen (datei.cgi). Die neue Datei war nur noch 13,4 KB groß! Was soll ich davon halten?! Da fragt man sich schon ob man bescheuert ist.

Wie hast du denn die Datei kopiert? Das sieht ja stark danach aus, als ob tatsaechlich noch Windows-Zeilenenden drin waren, aber jetzt raus sind. (Wenn die ganzen \r wegfallen, wird die Datei natuerlich kleiner.)

[E|B]

2003-08-29 15:06

User since
2003-08-08
2561 Artikel
HausmeisterIn

@Strat

Syntaxcheck hab ich schon gemacht. Der war OK! Rechte sind auch auf 755.

@Dubu

Das haben wir (Ishka und ich im ICQ) auch vermutet, das evtl. noch Windows Zeilenende enthalten sein könnten. Hab die Datei allerdings nur mit C&P kopiert.

Seltsam aber auch, dass mein Script jetzt funktioniert! Es kommt auch kein 500er mehr. Klar freut mich das jetzt, hab aber keine Ahnung, woran das gelegen haben könnte.

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Dubu

2003-08-29 16:05

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

[E|B
,29.08.2003, 13:06]Das haben wir (Ishka und ich im ICQ) auch vermutet, das evtl. noch Windows Zeilenende enthalten sein könnten. Hab die Datei allerdings nur mit C&P kopiert.

Seltsam aber auch, dass mein Script jetzt funktioniert! Es kommt auch kein 500er mehr. Klar freut mich das jetzt, hab aber keine Ahnung, woran das gelegen haben könnte.

Das ist doch ein Grund! Wenn du mit "copy" oder "cp" eine Datei kopierst, ist sie identisch. Wenn du den Text mit cut&paste kopierst, dann werden normalerweise nur sichtbare Zeichen und Leerzeichen kopiert. Die Zeilenenden haengen aber davon ab, was die Zielapplikation per default dafuer nimmt.

[E|B]

2003-08-29 17:29

User since
2003-08-08
2561 Artikel
HausmeisterIn

Könnte sein. Default ist Unix!

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Crian

2003-09-01 15:48

User since
2003-08-04
5873 Artikel
ModeratorIn

Eigentlich gehört dieser Thread nicht hierher. Aber ins CGI-Forum auch nicht, da es ein Windows/Unix-Problem ist. Aber in welchen der beiden Töpfe stecke ich ihn jetzt? Hmmm... erstmal hierlassen :D

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

[E|B]

2003-09-01 17:07

User since
2003-08-08
2561 Artikel
HausmeisterIn

Dann sag mir bitte einmal, wo ich den Beitrg hätet sonst hinposten können!

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Crian

2003-09-01 19:44

User since
2003-08-04
5873 Artikel
ModeratorIn

War schon ok, da wir keinen Topf für "interbetriebssystemäre" Fragen haben, denk ich.

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

Strat

2003-09-01 22:31

User since
2003-08-04
5246 Artikel
ModeratorIn

da es sich um ein cgi-script handelt, und das problem offenbar beim hochladen auf den server passiert ist, ist dieses frage hier in meinen Augen goldrichtig...

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/