Potrebna mi je pomoc oko ove perl scripte...

Potrebna mi je pomoc oko ove perl scripte... 26.05.2003. u 18:49 · pre 285 meseci #1

Skinuo sam forum scriptu sa www.avala.de , promenio sta mi trazi, obesio na sajt, i kad odem na nju on je otvori kao tekst, nema ni f od foruma:-) . Kako sam ja totalna neznalica sto se tiche perla pojma nemam kako da mi profunkcionishe ova scripta.Inache taj forum mi se dosta svidja i ne treba mi nista slozenije:-). Naravno ako ima neki, slican a jednostavniji kazite gde mogu da ga nadjem.Pa sad ako mozete pomognite mi da mi to proradi ako ne *ebiga :-))

Potpis

MilaN

Re: Potrebna mi je pomoc oko ove perl scripte... 27.05.2003. u 12:09 · pre 285 meseci #2

Jao Milane druze oces da napravis konkurentski forum ovom ovde odma smo te provalili. :)

Sala naravno.

Dobro, da probam da odgovorim. Ako ti explorer izlistava kod umesto da generise stranu moze da bude par stvari u pitanju:

- Mozda tvoj web server ne podrzava perl pa taj file posmatra kao da je *.txt i samo ispisuje njegov sadrzaj.

- Mozda nisi lepo napisao put do perl-a na pocetku skrpitke. Posto si reko da se malo razumes to je ono

Code:

#!/usr/bin/perl

- Ili mozda nije dobra extenzija fajlova koje si postavio, znaci ako server CGI (Perl skripte) posmatra kao *.cgi nece ti radiri ako ti stavis recimo *.pl

- Naravno uvek vodi racuna o dozvolama koje stavljas na fajlove, da ne davim o ovome 755 bi resilo problem.

Pozdrav.

Potpis

www.brzakupovina.com

Re: Potrebna mi je pomoc oko ove perl scripte... 27.05.2003. u 16:03 · pre 285 meseci #3

1. server podrzava perl, bar tako pishe tamo :-)
2.posto sam totalni laik oko perla,ko sto rekoh:-) evo kako pocinje kod:

Code:

#!/usr/bin/perl
# Set-Up Variables
$root = "$ENV{'DOCUMENT_ROOT'}";
$forumdir = "$root/cgi-bin/forum/forumdata";
$html = "no";
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
    local($name, $value) = split(/=/, $pair);
    $value =~ tr/+/ /;
    $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
    $value =~ s///g;
    $in{$name} = $value;
}
.............itd.

ako je potrebno pastiracu celi kod pa da mi kazesh gde je greska:-))))

3. nisam probao sa promenom ekstenzije, nemam dovoljno vreme:-)), probacu veceras pa cu ti reci.

4.nisam uopste menjao dozvole na fajlovima :-)

MilaN

Potpis

MilaN

Re: Potrebna mi je pomoc oko ove perl scripte... 28.05.2003. u 20:21 · pre 285 meseci #4

Ako si vec download-ovao kod sa nekog sajta onda je on sigurno proveren i radi tako da nema potrebe da pastujes ceo kod. Bolje proveri ovo sto am ti rekao.

Potpis

www.brzakupovina.com

Forum kao aplikacija na telefonu

Srodne teme