A
asper
Здравствуйте!
Вопрос такой, написал на перле скрипт, вот код:
#!/usr/local/bin/perl -w
print "Content-Type: text/html\n\n";
use CGI qw
standard);
use strict;
use DBI;
my $dbh = DBI->connect("DBI:mysql
pros1:localhost","opros1","123456") or die
"Error connecting to database";
$dbh->do("insert into tab1 (eat, number) values ('che', 100)");
$dbh->disconnect();
В роли сервера выступает denwer.
Ошибка никакая не выскакивает, но в базу ничего не добавляется. Помогите, пожалуйста, чайнику! Спасибо!
Вопрос такой, написал на перле скрипт, вот код:
#!/usr/local/bin/perl -w
print "Content-Type: text/html\n\n";
use CGI qw
![Smile (: (:](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f642.png)
use strict;
use DBI;
my $dbh = DBI->connect("DBI:mysql
![Eek! :o :o](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f631.png)
"Error connecting to database";
$dbh->do("insert into tab1 (eat, number) values ('che', 100)");
$dbh->disconnect();
В роли сервера выступает denwer.
Ошибка никакая не выскакивает, но в базу ничего не добавляется. Помогите, пожалуйста, чайнику! Спасибо!