1. Главная
  2. /
  3. DataBases
  4. /
  5. Perl работа с mysql через DBI

Perl работа с mysql через DBI

Для работы с мускулом через perl обычно используют модуль DBI, небольшой пример как


#!/usr/bin/perl
use DBI;
my $host = "localhost"; # MySQL-сервер нашего хостинга
my $port = "3306"; # порт, на который открываем соединение
my $user = "ПОЛЬЗОВАТЕЛЬ_БД"; # имя пользователя
my $pass = "password"; # пароль
my $db = "ИМЯ_БД"; # имя базы данных
$dbh = DBI->connect("DBI:mysql:$db:$host:$port",$user,$pass);
$sth = $dbh->prepare("select * from table");
$sth->execute; # выполняем запрос
while ($ref = $sth->fetchrow_arrayref) {
print "$$ref[0]n"; # печатаем результат
}
$rc = $sth->finish;
$rc = $dbh->disconnect;  # закрываем соединение

Думаю на основе этого примера можно уже воять что-то свое.

Поделиться ссылкой на статью

2 комментария. Оставить новый

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *

Заполните поле
Заполните поле
Пожалуйста, введите корректный адрес email.
Вы должны согласиться с условиями для продолжения

Категории

Меню