User since
2006-01-19
192
Artikel
BenutzerIn
Anmerkung dazu: Aus "internen Gründen" dürfen nicht alle Scripts, die auf pl enden als mod_perl ausgeführt werden.
User since
2006-01-19
192
Artikel
BenutzerIn
Nanu... Warum habe ich das denn übersehen...?
Was ist das Startup-Script?
Ich vermute mal Nein. Ich habe nur das oben angegebene Script geschrieben. Mehr habe ich nicht gemacht.
Was ist also das Startup-Script? Erstelle ich das oder gibt`s das schon? Wo finde ich das?
Ich habe aber auf dem anderen Server, auf dem es läuft, nichts anderes gemacht.\n\n
<!--EDIT|olruebe01|1144843901-->
User since
2006-01-19
192
Artikel
BenutzerIn
Ich habe jetzt DBI und APache::DBI in der startup.pl geladen. Bringt auch nichts :-(
Auf dem funktionierenden Server ist dies allerdings auch nich in der Startup...
Sehe ich das richtig, dass der Ordner Apache2 auf anderen Servern auch mal httpd heissen kann? Die Inhalte sind nämlich sehr ähnlich...
User since
2003-08-04
14371
Artikel
ModeratorIn
Bitte benutze die ?-Notation von
DBI siehe auch
Artikel. Du öffnest hier riesen Sicherheitslöcher!
User since
2006-01-19
192
Artikel
BenutzerIn
Ok. Das Thema hatten wir vor ein paar Tagen. Ich dachte das wäre mit ' ' ok. SO hatte ich das verstanden.
Wie wäre es denn dann besser? Habe mir das durchgelesen aber wie man die ? setzt wurde nicht richtig erklärt...
Und habt Ihr einen Tipp zu meinem eigentlichen Problem? Sonst kann die Tabelle von mir aus auch gelöscht werden :-)
User since
2006-01-19
192
Artikel
BenutzerIn
Hier mal ein kurzes Test-Script. Unter CGI alles Super, unter ModPerl Error500 mit dem genannten Eintrag im Error-Log
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
#!/usr/bin/perl -w
my $time=time();
my $item =7406158155;
use CGI::Carp qw(fatalsToBrowser);
use Fcntl qw(:DEFAULT :flock);
use CGI qw(:standard);
use CGI;
use Apache::DBI;
use DBI;
my $datenbank = "AAAAA";
my $datenbankhost = "localhost";
my $datenbankuser = "BBBBB";
my $datenbankpw = "CCCCC";
my $fehlermeldung = "<li>Fehler bei der Datenbankverbindung aufgetreten. Bitte ueberpruefen Sie die Angaben";
my $dbh = DBI->connect("DBI:mysql:$datenbank:$datenbankhost","$datenbankuser","$datenbankpw") || fehlerausgabe($fehlermeldung);
(undef,undef,my $hour,undef,undef,undef,my $wday,undef,undef) = localtime($time);
$wday = $wday+24;
$dbh->do (qq~UPDATE `itemstats` SET `H$hour` = H$hour+1,`H$wday` = H$wday+1, letzteraufruf = $time WHERE item = '$item'~);
$dbh->disconnect; # DB Connect beenden
print "Content-type: text/html;CHARSET=iso-8859-1\n\n";
print "ok";
User since
2006-01-19
192
Artikel
BenutzerIn
Der Server, auf dem es läuft, hat Version 5.8.1
Ich habe jetzt mal einen Auftrag an die Serve-Company vergeben. Mal sehen, ob die was rauskriegen...
User since
2006-01-19
192
Artikel
BenutzerIn
macht sich das in der GEschwindigkeit bemerkbar, dass das doppelt war?
User since
2005-01-17
14563
Artikel
Admin1
Nein. Aber es ist trotzdem nicht sinnvoll.