, und hätte gern gewusst, wieviele Leute diese Sachen runterladen... (CGI ev.?)
Was muss ich machen...?
Bitte helft mir und ich danke im Voraus...
Danke
D@nieLLLL
Homepage selbermachen 7.852 Themen, 35.619 Beiträge
(Anonym) DanieLLLL (Anonym) „Ich will einige Sachen zum Download anbieten auf meiner HP...“
welche sachen???
kq (Anonym) „welche sachen???“
Er will nen Counter, der die Downloads zählt.
jensemann DanieLLLL (Anonym) „Ich will einige Sachen zum Download anbieten auf meiner HP...“
Entweder siehst du mal auf den einschlägigen Seiten für CGIs vorbei, solltest du dort nichts finden, kannst du dich bei mir melden, dann schreib ich dir eben ein kleines CGI in Perl das die Downloads zählt, ist ne Sache von 10 Minuten. Würde das Script auch gleich hier posten, hab da aber gerade keine Zeit zu.
Du must natürlich bei deinem Provider die möglichkeit haben CGIs in Perl auszuführen, bei prohosting.com bekommst du so was z.B. kostenlos.
Mfg Jensemann
(Anonym) DanieLLLL (Anonym) „Ich will einige Sachen zum Download anbieten auf meiner HP...“
Wäre nett wenn du das heir auch mal für andere Posten könntest :)
jensemann DanieLLLL (Anonym) „Ich will einige Sachen zum Download anbieten auf meiner HP...“
Stimmt, hast recht! Hier ist es:
#!/usr/bin/perl
use CGI qw(:standard);
# gibt dem script als Parameter die Array Nummer der zu holenden Datei
my $getfile = param('getfile');
# endung der Lockdatei, wird an den Namen von $avaliable[n] angehangen
my $extension = 'txt';
# array der angebotenen Dateien
$available[0] = 'test.zip';
$available[1] = 'test.tar.gz';
$available[2] = 'test.tar.bz2';
$available[3] = 'foo.tar.gz';
if (defined $available[$getfile]) {
# nr existiert im array
# erzeuge Dateinamen
my $logfile = "$available[$getfile].$extension";
# öffne Dateihandle zum lesen UND schreiben
open(FILE, "+>$logfile");
# erste Zeile der Datei nach $counter einlesen und
# Zeilenumbruch entfernen
chomp($counter =
jensemann DanieLLLL (Anonym) „Ich will einige Sachen zum Download anbieten auf meiner HP...“
Hab da noch was vergessen: Der Pfad zum Perlinterpreter muss eventuell angepasst werden, #!/usr/bin/perl muss also abgeändert werden (Pfad beim HP-Provider erfragen).
Mfg Jensemann
jensemann DanieLLLL (Anonym) „Ich will einige Sachen zum Download anbieten auf meiner HP...“
Ich bin auch zu blöd heute! Jetzt habt ihr das script und wisst nicht was ihr damit machen sollt (oder wie ihr es benutzt). Also, gesetzt den Fall, das Script liegt im Stammverzeichniss deiner Seite, dann rufst du es so auf:
scriptname.pl?getfile=2
Die Nummer gibt die Nummer der Datei an, die runtergeladen werden soll. Mit Nummer ist die Nummer gemeint, die im Array dieser datei zugeordnet ist. Ein Aufruf mit 2 würde also die Datei www.meinedomain.de/test.tar.bz2 runterladen und den Counter in die Datei test.tar.bz2.txt schreiben. Im Array, können natürlich auch Pfade angegeben werden (aber keine Domains, dazu müsste der print redirect("bla-foo-bla") aufruf abgeändert werden. Der Wert der Variablen im Array wird einfach an die Domain angehangen.
So, ich hoffe das wars jetzt.
bess demnähx
Mfg Jensemann
(Anonym) DanieLLLL (Anonym) „Ich will einige Sachen zum Download anbieten auf meiner HP...“
Vielen Dank !
ach ja, ich nehme an man sollte es im ASCII Modus aufladen und bei chmod 755 geben.
