PERL & CGI

#!/usr/bin/perl
use strict;
use CGI ':standard';
my ($to, $from, $subject, $contents);

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

$to = param('to');
$from = param('from');

$subject = param('subject');
$contents = param('contents');

open(MAIL, "|/usr/sbin/sendmail")
 || Error ('open', 'mail program');

print MAIL "To: $to \nFrom: $from\n";
print MAIL "$subject: $subject\n";
print MAIL "$contents\n";

close (MAIL);

print "Thanks for your comments.";

sub Error {
 print "The server can't $_[0] the $_[1]: $! \n";
exit(0);

}

Такое счатье мне нужно, но ещё более круче, воощем хочу создать spam-форму, я не спамер, но есть те, кто мне почту закидывают...

#!/usr/bin/perl/
#comments.cgi

use strict;
use CGI ':standard';

my $comments = param('comments');

open (LOG, ">> /home/hop/k/i/n/kino/public_html/cgi-bin/logfile.txt")
  || Error('open', 'file');
print "$comments\n";
close (LOG);

print "Content-type: text/html\n\n\";
print "Ваши комментарии были добавленны!\n";

exit(0);

print LOG "$comments\n";

строчку:
#!/usr/bin/perl/

заменить на:
#!/usr/bin/perl

делов то...

PS: лучше поздно чем никогда :)

интересно у Pinochet проблема решена?

ВСем Здрасте!

Челы, тут такая тема, вообщем скрпт вообще мёртвый...
вот какая чушь выходит, когда я его пытась запустить: http://kino.fxf.ru/cots.html
там форма, на нёё нажмите и увидете, что получится.
я думаю, що ето всё из-за хоста, но CHMOD поставил как надо = 750, но всёравно не фунЦЫклирует никак
Как наверно вы уже догадались, я переехал с webservis.ru на fxf.ru (хотя админы одни и теже пиплы), но вот в чём ещё дело, на fxf.ru, админы указали в разделе сайта FAQ...по-моему, что скрипты сами автоматом выставляют CHMOD, но что-то я етого не вижу тама, пробывал им написать, но получил игнор..
Мож, хто, шо подскажет?

А челы и ещё, мож хто знает чела, не помню имя, только мыло morozov#unicode.kz
На сколько знаю, ето мыло тоже уже мертво, кажись Виталя его зовут, он ещё живёт вроде бы на Кутузова 169..чел тоже на PERL'e рулит.

похоже что просто скрипты не включены(не поддерживаются).
как вариант попробовать скрипт переименовать в .pl вдруг случится чудо.

Pinochet

А челы и ещё, мож хто знает чела, не помню имя, только мыло morozov#unicode.kz
На сколько знаю, ето мыло тоже уже мертво, кажись Виталя его зовут, он ещё живёт вроде бы на Кутузова 169..чел тоже на PERL'e рулит.