Здравсвуйте. Кто может доработать или помочь чем нить ??
Вот скрипт( выводит из БД таблицу):
#!C:\\perl\\bin\\perl.exe
use DBI;
use CGI::Carp qw(fatalsToBrowser);
$db_name="phone";
$db_host="localhost";
$db_user="root";
$db_table="companies";
$db_password="";
print("Content-Type: text/html\\n\\n");
$dbh=DBI->connect("DBI:mysql:$db_name:$db_host",$db_user,$db_password);
$sth=$dbh->prepare("SELECT * FROM $db_table");
$sth->execute();
while(($row{name}, $row{address}, $row{tel}, $row{timework},) = $sth->fetchrow_array()) {
$row_str.="
$row{name} | $row{address} | $row{tel} | $row{timework} |
";
}
print << "[END]";
Вывод данных[END]
Нужно связать 2 таблицы по ключевым полям. Это что то типо у меня на страничке отображается одна таблица,я выбираю нужный раздел в ней и он меня переносит на другую таблицу ??