Auch Dir ein ganz besonders fröhliches Hallo,
Kann mir jemand helfen solch ein Script zu proggen?
nein, wir können Dir aber helfen, es zu programmieren. Dazu musst Du uns sagen, wo Du Probleme hast, warum diese Probleme auftreten, wie Du sie und mit jeweils welchem Ergebnis zu lösen versucht hast.
Nur nicht in einer Rangfolge; und das ist das Problem.
perldoc -f sort
perldoc perlfaq4 "How do I sort an array by (anything)?"
#!C:/Perl/bin/perl -w
use strict;
use CGI::Carp qw(fatalsToBrowser);
Schön!
print "Content-type: text/html\n\n";
[...]
if ( $ENV{QUERY_STRING} eq "Spieler=Voltobal&Passwort=&Status=Gewonnen" )
Nicht schön bis grausam.
perldoc CGI
perldoc perlstyle
open(DATEI0, "<../USClan/Rangliste/PVoltobal.dat");
perldoc -f die
Im CGI-Kontext ist das "aktuelle Verzeichnis", auf das Du Dich hier beziehst, übrigens undefiniert. Diese Datei kann überall gesucht werden.
my $AA = <DATEI0>;
perldoc perlstyle zur Benamsung von Variablen
open(DATEI0, ">../USClan/Rangliste/PVoltobal.dat");
Jiautsch. Was passiert, wenn zwei Anfragen fast gleichzeitig kommen? Es drohen Datenverluste.
perldoc -f flock
perldoc perlopentut
open(DATEI0, "<../USClan/Rangliste/PVoltobal.dat");
Schon wieder? Beschäftige Dich auch mit der Thematik Kapselung, und lies
perldoc -f sub
SPIELER B __ZORRO11__
Was passiert eigentlich, wenn ein weiterer Spieler hinzukommt? Änderst Du dann das Script?
Cheatah