Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Gde gresim?

[es] :: Perl :: Gde gresim?

[ Pregleda: 3788 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

tupa

Član broj: 504
Poruke: 29
*.net022.co.yu



Profil

icon Gde gresim?28.07.2001. u 18:34 - pre 275 meseci
Napravio sam form mail skript ali problem je sto nakon slanja podataka ne pokazuje stranu da je poruka poslata nego pokazuje gresku. Inace podaci stizu na adresu.
Evo koda pa recite gde gresim
#!usr/bin/perl

print "Content-type:text/htmlnn";

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@values=split(/&/, $buffer);
foreach $i (@values) {
($varname,$value) = split(/=/,$i);
$value=~ tr/+/ /;
$value=~ s/%([a-fA-f0-9][a-fA-f0-9])/pack("C", hex($1));
$FORM{$name} = $value;
}



$mailprog='/usr/sbin/sendmail';


$recipient="tupa/@yahoo.com";

open (MAIL, "|$mailprog -t") or dienice("Ne moze se pokrenuti $mailprogn")

print MAIL "To: $recipientn";


print MAIL "Replay-to: $FORM{'email'}n";

print MAIL "Subject: Poruka iz formenn";

foreach $key (keys(%FORM)) {
print MAIL "$key = $FORM{$key}";
}


close(MAIL);


print "<html><head><title></title><head><body>Poslao si mail</body></html>"n;



sub dienice {
my($errmsg)=@_;
print "$errmsg tu je greskan";
print "</body></html>";
exit;
}




tupa
 
Odgovor na temu

tOwk
Danilo Šegan
Zemun/Beograd

Član broj: 94
Poruke: 2743
*.etf.bg.ac.yu

ICQ: 9344053
Sajt: alas.matf.bg.ac.yu/~mm011..


+2 Profil

icon Re: Gde gresim?30.07.2001. u 02:54 - pre 275 meseci
Citat:

...
print "<html><head><title></title><head><body>Poslao si mail</body></html>"n;
...


U celom programu jedino mi se cini da bi greska mogla biti ovde. Ono krajnje n za novi red bi trebalo biti unutar navodnika.

Toliko.

Možda se moje mišljenje promenilo, ali ne i činjenica da sam u pravu.
 
Odgovor na temu

mire
Miroslav Madzarevic
Belgrade

Član broj: 252
Poruke: 145
195.14.147.*



Profil

icon Re: Gde gresim?30.07.2001. u 10:13 - pre 275 meseci
SEIK

na prvi pogled $recipient="tupa/@yahoo.com"; umesto backslash @ (ovaj forum "jede" backslash), osnovna greska


[Ovu poruku je menjao mire dana 07-30-2001 u 11:20 AM GMT]
mire@zwer:~$ traceroute zivot.sloboda.potraga-za-srecom
 
Odgovor na temu

tupa

Član broj: 504
Poruke: 29
*.net022.co.yu



Profil

icon Re: Gde gresim?30.07.2001. u 10:19 - pre 275 meseci
Citat:
tOwk je napisao:
Citat:

...
print "<html><head><title></title><head><body>Poslao si mail</body></html>"n;
...


U celom programu jedino mi se cini da bi greska mogla biti ovde. Ono krajnje n za novi red bi trebalo biti unutar navodnika.

Toliko.

Da tu je bila greska.
tupa
 
Odgovor na temu

tOwk
Danilo Šegan
Zemun/Beograd

Član broj: 94
Poruke: 2743
*.rcub.bg.ac.yu

ICQ: 9344053
Sajt: alas.matf.bg.ac.yu/~mm011..


+2 Profil

icon Re: Gde gresim?31.07.2001. u 04:17 - pre 275 meseci
Citat:
mire je napisao:
SEIK

na prvi pogled $recipient="tupa/@yahoo.com"; umesto backslash @ (ovaj forum "jede" backslash), osnovna greska



Posto je rekao da je rezultat uredno stigao na mail, pretpostavio sam da tu ne moze biti greske, vec da je nesto do ovog foruma i njegove gladi (jede sve i svasta, pa i to) sto se tice te linije. Prema tome, jedino je bilo moguce posle slanja mail-a da nesto ne valja, a jasno je da ona jedna linija nece uredno proci kroz interpreter.

Toliko.

Možda se moje mišljenje promenilo, ali ne i činjenica da sam u pravu.
 
Odgovor na temu

[es] :: Perl :: Gde gresim?

[ Pregleda: 3788 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.