....
10 $mailprog="sendmail -t";
20 $mail=param('mail');
30open(MAIL,"mailprog");
40 print MAIL "From:xxx\@host.ru\n";
50 print MAIL "To:$mail\n";
60 print MAIL "\n";
...
1XX close(MAIL);
voshem eta baga ne rabotaet....:( i ya primerno znau po4emu..(stroka 30)
po4emy to sendmail'u nikto ne peredaet email, stranno(ili eto delaetcya v
stroke 50?) :( tk dolgno bit'
30open(MAIL,sendmail $email)
vopros....
kak vcu etu fenu ibioti i hacknut' servant:)))???