|
Что здесь не так помогите!
|
|||
---|---|---|---|
#18+
Что у мменя здесь не так, помогите начинаещему: use DBI; print "content-type:text/html\n\n"; $method=$ENV{'QUERY_STRING'}; $form_data=~s/%(..)/pack("C", hex($1))/eg; $form_data=~s/\n/\0/g; @pairs=split(/&/, $form_data); foreach $pair(@pairs) { ($name, $value)=split(/=/, $pair); $form{name}=$value; } my $dbh=DBI->connect("DBI:mysql:database=lib; host=localhost", "root", "") or die $DBI::errstr; if (!$form{'tema'}) { $result="INSERT INTO tema (kod, tema) VALUES ('', '$value{'tema'}')"; print<<Ok <html> <body>Запись в базу прошла успешно</body></html> Ok ; } где kod автоинкрементное поле tema символьное Заполняя форму и вызывая этот скрипт, сначала браузер предлагает сохранить или открыть данный скрипт, а потом быстро выполняет ничего на екран не выводя, и даже запись в базу не вставляет. Помогите плиз. И второе: где можно взять хорошую литературу по перлу , в часности для работы c бд в инете? Спасибо ... |
|||
:
Нравится:
Не нравится:
|
|||
12.11.2002, 12:22 |
|
|
start [/forum/topic.php?fid=47&fpage=713&tid=1856268]: |
0ms |
get settings: |
10ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
67ms |
get topic data: |
12ms |
get forum data: |
2ms |
get page messages: |
36ms |
get tp. blocked users: |
2ms |
others: | 12ms |
total: | 162ms |
0 / 0 |