Три статьи по работе с MySQL


Работа с MySql - часть 2


При этом, если все нормально, вы на выходе этого скрипта должны ничего получить что-то типа:

таблица1 таблица2 таблица3

Где таблица1 - наименование таблиц в вашей базе данных.

Если соединение создать не получилось, тогда что-то неправильно, или не тот хост, пароль, логин или нет такой базы - например, если нет базы данных, то будет что-то типа:

Unknown database 'ваша_база_данных' at try.pl line N.

Если нет доступа пользователю под "логин" или неправильные логин или пароль, то будет выдано сообщение

Access denied for user: 'логин@ваш_хост.домен' (Using password: YES) at try.pl line N.

Адрес сервера может быт как каноническим вида dbserver.domain.com (если корректно работет DNS) или абсолютным IP адресом.

Итак, если удалось успешно законнектится, то вы получите список таблиц в вашей БД. Если нет - проверьте логин/пароль, поругайтесь с сисадмином, чтобы он вам разрешил доступ с вашей машины к серверу MySql. (Только на сисадмина сильно не наезжайте - может что-то плохое сделать вам, сам знаю, сам сисадмин:)).

Теперь попробуем создать таблицу в вашей базе данных. Определимся сразу - мы сделаем небольшой каталог ссылок на ваши любимые ресурсы. Создадим таблицу, гордо именуемую "links". В таблице будут следующие поля:

Наименование Тип Длина Комментарий
id TINYINT 4 Идентификатор, должен быть автоинкремент
name VARCHAR 64 Нимаенование ссылки
url VARCHAR 128 Ссылка - URL
category TINYINT 4 Номер категории

Когда со структурой таблицы понятно, изготовим SQL запрос для ее создания:

CREATE TABLE links ( id TINYINT, name VARCHAR(64), url VARCHAR(128), category TINYINT }

В Perl его надо исполнять следующим образом:

#!/usr/bin/perl use DBI; my $dbh = DBI->connect("DBI:mysql:database=ваша_база_данных;host=адрес_сервера_mysql", "логин", "пароль") || die $DBI::errstr; $dbh->do("CREATE TABLE links
(id TINYINT, name VARCHAR(64), url VARCHAR(128), category TINYINT)"); $dbh->disconnect();




- Начало -  - Назад -  - Вперед -