MySQL & mSQL



Msql.pm API - часть 7


Пример

use Msql;

my $db = Msql->connect;

# Пора закрывать базу данных...

my $result = $db->shutdown;

die "Команда не выполнена!" if $result — -1;

print "Сервер остановлен.\n";

Msql::Statement::as_string

$formatted_table = $statement_handle->as_string;

Msq1: :Statement: :as_string возвращает данные, содержащиеся в описателе команды, в виде аккуратно отформатированной таблицы ASCII. Таблица аналогична тем, которые выводит монитор msql. Программа pmsql, поставляемая с модулем Msql.pm, использует эту функцию для создания своих таблиц.

Пример

use Msql;

my $db = Msql->connect;

$db->selectdb('mydata');

my $query = "SELECT * FROM mytable";

my $mytable_output = $db->query($query);

print "Моя таблица:\n", $mytable_output->as_string;

# Выводится вся таблица в гораздо более приемлемом виде,

# чем в примере Msql:[Statement:ifetchhash.

Msql::Statement::dataseek

$statement_handle->dataseek($row_number);

Msql: :Statement: :dataseek принимает в качестве аргумента номер строки. Функция переустанавливает данные, так что следующий вызов Msql: :Statement: :fetchrow или Msql: Statement: :fetchhash возвращает данные указанной строки. Если указанный номер строки выходит за границы таблицы, указатель устанавливается на конец таблицы и при следующем вызове будет возвращено неопределенное значение undef. Первая строка таблицы имеет номер 0.

Пример

use Msql;

my $db = Msql->connect;

$db->selectdb('mydata');

my Squery = "SELECT name, date FROM myothertable";

my $myothertable_output = $db->query($query);

my @names = $myothertable_output->fetchcol(0);

my @dates = $myothertable_output->fetchcol(1);

# Теперь указатель установлен в конце таблицы.

$myothertable_output->dataseek(0);

# Теперь указатель установлен на начало таблицы,

print "Это первая строка данных: ", $myothertable_output->fetchrow, "\n".

Msql::Statement::fetchcol




Содержание  Назад  Вперед