Ψάχνω script για livescore

[chvet]

Re paidia exw mia selida sto net kai thelw na balw livescore gia podosfairo. Mhpws xerete kapoio script se ASP h' PHP poy na mporw na bazw omades score, lepto klp ?

[baxter]

file chvnet,

kati tetoio borei na ginei kai me php kai me perl..

ypothetw oti theleis na ginodai manually oi allages sti selida etsi?

boreis na ftiaxeis diko sou script..

ena poly aplo se perl..

 

ftiaxe ena file scores.txt (se afto to file tha binoun ta paihnidia,omades,score,lepta)

to arheio scores.txt tha ehei tin exis morfi se kathe grammi tou:

game. [team1]-[team2] [score1-score2] [lepto]

px.

143. [milan]-[parma] [1-0] [57]

156. [aek]-[monaco] [15-0] [23]

klp...

 

kathe allagi pou thes tha tin kaneis mesw aftou tou file..

(boreis na ftiaxeis kai mia online forma opou tha dineis arithmo paihnidiou kai tha sou vgazei tis plirofories

me ti dynatotita na kaneis edit,an thes kati tetoio steile mou ena mail)

 

 

to script pou tha emfanizei tis plirofories tou scores.txt einai to parakatw :

ftiaxe ena file kai onomase to livescore.cgi

 

>
#!/usr/bin/perl
# to allazeis sto path tis perl ston server sou

 print "Content-type: text/html\n\n";

 open(F,"scores.txt") || die "couldnt find scores.txt";
 while ($line=<F>) {
   $line =~ /^([0-9]*)\. \[(.*)\]-\[(.*)\] \[([0-9]*)-([0-9]*)\] \[([0-9]*)\]$/;
   $game=$1;
   $team1=$2;
   $team2=$3;
   $score1=$4;
   $score2=$5;
   $min=$6;
   print "$game. $team1 vs $team2 [$score1-$score2] [$min']<br>";
 }
 close(F);

 

kane ena ~chmod 755 livescore.cgi an treheis se unix server

 

den edwsa emfasi sto shediasmo tis selidas,afto einai diko sou provlima..

to scriptaki apla typwnei tis plirofories..

prosthese html kwdika an thes..

 

an den katalavaineis kati just reply..

[chvet]

Eyxaristw gia to scriptaki soy alla mallon den tha mporei na doylepsei sto hosting moy o opoios doylebei win kai oxi Unix, opote to perl ap' oti xerw logika den tha to leitoyrghsei. Mporei na dextei ap' oti xerw kai doylebw *.ASP & *.PHP

 

Ean mporeis na ftiaxeis ena tetoio scriptaki se asp h' PHP toylaxiston alla se win kai oxi unix pistebw oti tha moy doylepsei. Eyxaristw !

[baxter]

giati na min to leitourgisei se win?

ean ehei egatestimeni perl kai vevaia borei na leitourgisei...

ean o hosting sou ypostirizei cgi sigoura tha ehei perl..

ean einai diko sou to "hosting" katevase tin activeperl..

http://www.activeperl.com

 

me php , asp den asholoumai opote ciao

[dominant]

http://www.activestate.com