Справочник и примеры языка PHP


Справочник по Perl


Глава №21
Глава №21 Справочник по Perl...
Установка
Установка Для использования интерфейсов mSQL и MySQL к модулям DataBase Dependent/DataBase Independent (DBI/DBD) или MsqlPerl и MysqlPerl необходимо иметь следующие компоненты: Perl 5 В вашей...
DBI pmAPI
DBI.pmAPI DBI API является стандартным API баз данных в Perl. Поэтому, хотя MsqPerl и MysqlPerl могут быть более распространены в унаследованных программах, новые программы следует писать с ис...
Use
use use DBI; Следует объявлять во всех программах Perl, использующих модуль DBI....
DBI available_drivers
DBI::available_drivers @available_drivers = DBI->available_drivers; @available_drivers = DBI->available_drivers($quiet); DBI: :available_drivers возвращает список имеющихся драйверов DB...
Пример
Пример use DBI; my @drivers = DBI->available_drivers; print "Доступны следующие драйверы:\n" . join("\n",@drivers) . "\n Ho нас интересуют только mSQL и mysql. :)...
DBI bind_col
DBI::bind_col $result = $statement_handle->bind_col($col_num, \$col_variable, \%unused); DBI: :bind_col связывает колонку команды SELECT с переменной Perl. При всяком чтении или изменении...
Пример
Пример use OBI; my $db = DBI->connect('DBI:mSQL:mydata', undef,undef); my $query = "SELECT name, date FROM myothertable"; my $myothertable_output = $db->prepare($query); my (...
DBI bmd_columns
DBI::bmd_columns $result = $statement_handle->bincl_columns(\%unused, @list_of_refs_to_vars); DBI: : bind_columns привязывает весь список скалярных ссылок к значениям соответствующих полей...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mSQL:mydata',undef,undef); my $query = "SELECT name, date FROM myothertable"; my $myothertable_oulput = $db->prepare($query); my ($...
DBI bind_param
DBI::bind_param $result = $statement_handle->bind_param($param_number, $bind_value); $result = $statement_handle->bind_param($param_number, $bind_value, $bind_type); $result = $statenent_...
Таблица 211 Соответствие типов SQL
Таблица 21-1. Соответствие типов SQL...
DBI
DBI...
MSQL
MSQL...
MySQL
MySQL SQL_CHAR CHAR TYPE FIELD TYPE CHAR IDENT TYPE...
Пример
Пример use DBI; my $db = DBI->connect('DBD:msql:mydata','me','mypass'); my Sstatement = $db->prepare( "SELECT name, date FROM myothertable WHERE name like ? OR name like ?");...
DBI connect
DBI::connect $db = DBI->connect($data_source, $username, $password); $db = DBI->connect($data_source, $username, $password, \%attributes); DBI:: connect требует по крайней мере три арг...
Пример
Пример use DBI; my $db1 = DBI->connect('DBI: mSQL:mydata',undef,undef); # Теперь $db1 представляет соединение с базой данных 'mydata'на локальном # сервере mSQL. my $db2 = DBI->connec...
DBI data_sources
DBI::data_sources @data_sources = DBI->data_sources($dbd_driver); DBI: :data_sources принимает в качестве аргумента имя модуля DBD и возвращает все имеющиеся для этого драйверы базы данных...
Пример
Пример use DBI; my §msql_data_sources = DBI->data_sources('mSQL'); my @mysql_data_sources = DBI->data_sources('mysql'); # Должны быть установлены DBD::mSQL и DBO::mysql, иначе #...
DBI do
DBI::do $rows_affected = $db->do($statement); $rows_affected = $db->do($statement, \%unused); $rows_affected = $db->do($statement, \%unused, @bind_values); DBI: : do непосредственно...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mSQL:mydata',undef,undef); my $rows_affected = $db->do("UPDATE mytable SET name='Joe' WHERE name='Bob"'); print "$rows_affected...
DBIdisconnect
DBI-disconnect $result = $db->disconnect; DBI: : disconnect отсоединяет описатель базы данных от сервера баз данных. Для mSQL и MySQL в этом обычно нет необходимости, поскольку эти базы дан...
Пример
Пример use DBI; my $db1 = DBI->connect( 'DBI:mSQL:mydata',undef,undef); my $db2 = OBI->connect('DBI:mSQL:mydata2',undef,undef); $db1->disconnect; # Соединение 'mydata' разорвано. С...
DBI dump_results
DBI::dump_results $neat_rows = DBI::dump_results($statement_handle); $neat_rows = DBI::dump_results($statement_handle, Smaxlen); $neat_rows = DBI::dump_results($statement_handle, $maxlen, $lin...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mSQL:mydata',undef,undef); my Squery = "SELECT name, date FROM myothertable"; my $myothertable_output = $db->prepare($query); $myo...
$DBI err
$DBI::err $error_code = $handle->err; $DBI::err возвращает код последней по времени ошибки DBI. Код ошибки соответствует сообщению об ошибке, возвращаемому функцией $DBI: :errstr. Переменн...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mysql:mydata','webuser','super_secret_squirrel'); # Этот запрос имеет синтаксическую ошибку... my Soutput = $db->prepare('SLECT * from mydata...
$DBI errstr
$DBI::errstr $error = $handle->errstr; Эта функция возвращает сообщение о последней происшедшей ошибке DBI. Значение сохраняется до возникновения новой ошибки, когда оно будет заменено. Есл...
Пример
Пример Use DBI; my $db = DBI->connect('DBI:mysql:mydata','wcbuscr','super_secret_squirrel'); my $error = $db->errstr; warn("Boj последняя ошибка DBI: $error");...
DBI execute
DBI::execute $rows_affected = $statement_handle->execute; $rows_affected = $statement_handle->execute(@bind_values); DBI: : execute выполняет SQL-команду, содержащуюся в описателе коман...
Пример
Пример use DBI; my $db = DBI->connect('OBI:mSQL:mydata',undef,undef); my $statement_handle = $db->prepare("SELECT * FROM mytable"); my $statement_handle2 = $db->prepare(&quo...
DBI fetchall_arrayref
DBI::fetchall_arrayref $ref_of_array_of_arrays = $statement_handle->fetchall_arrayref; DBI: :fetchall_arrayref возвращает все оставшиеся данные в описателе команды в виде ссылки на массив....
Пример
Пример use DBI; my $db = DBI->connect('DBI:mSQL:mydata' ,undef,undef); my $query = "SELECT name, date FROM myothertable"; my Soutput = $db->prepare($query); $output->exe...
DBI fetchrow_array
DBI::fetchrow_array @row_of_data = $statement_handle->fetchrow; DBI: : fetch row возвращает очередную строку данных из описателя команды, созданного DBI: :execute . Каждое последующее обра...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mSQL:mydata',undef,undef); my $query = "SELECT name, date FROM myothertable WHERE name LIKE 'Bob%'"; my $myothertable_output = $db->...
DBI fetchrow_arrayref DBI fetch
DBI::fetchrow_arrayref, DBI::fetch $аrrау_rеГегепсе = $statement_handle->fetchrow_arrayref; $array_reference = $statement_handle->fetch; DBI: : fetchrow_arrayref и ее псевдоним DBI: :f...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mSQL:mydata', undef, undef); my $query = "SELECT name, date FROM myothertable WHERE name LIKE -Bob%'"; my $myothertable_output = $db-...
DBI fetchrow_hashref
DBI::fetchrow_hashref $hash_reference = $statement_handle->fetchrow_hashref; DBI: :fetchrow_hashref работает так же, как OBI: :fetchrow_arrayref , но возвращает ссылку на ассоциативный, а...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mSQL:mydata',undef,undef); my $query = "SELECT * FROM mytable"; my $mytable_output = $db->prepare($query); $mytable_output->exe...
DBI finish
DBI::finish $result = $statement_handle->finish; DBI:: finish освобождает все данные в описателе команды, чтобы можно было уничтожить описатель или снова подготовить его. Некоторым серверам...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mysql:mydata','me','mypassword'); my $query = "SELECT * FROM mytable"; my $mytable_output = $db->prepare($query); $mytable_output-...
DBI func
DBI::func $handlc->func(@func_argumcnts, $func_name); @dbs = $db->func("$hostname", '_ListDBs'); @dbs = $db->func("$hostname:Sport", '_ListDBs'); @tables = $db->...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mysql:mydata','me','mypassword'); my @tables =.$db->func('„List-Tables'); # @tables содержит теперь список таблиц в 'mydata'....
DBI neat
DBI::neat $neat_string = DBI: :neat($s'tring); $neat_string = DBI::neat($string, $maxlen); DBI: : neat Принимает в качестве аргументов строку и необязательную длину. Затем строка форматирует...
Пример
Пример use DBI; my $string = "Это очень, очень длинная строка, в которой много чего написано. "; my$neat_string = OBI: :neat($string,14); # Теперь $neat_string такая: 'Это очень, о...
DBI neat_list
DBI::neat_list $neat_string = DBI::neat_list(\@listref, $maxlen); $neat_string = DBI::neat_list(\@listref, $maxlen, $field_seperator); DBI: :neat_list принимает три аргумента и возвращает ак...
Пример
Пример use DBI; my @list = (' Bob', 'Joe', 'Frank'); my $neat_string = DBI::neat_list(\@list, 3); # Теперь $neat_string такая: 'Bob', 'Joe', 'Fra......
DBI prepare
DBI::prepare $statement_handle = $db->prepare($statement); $statement_handle = $db->prepare($statement, \%unused); DBI: :prepare принимает в качестве аргумента SQL-команду, которую неко...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mysql:mydata','me','mypassword'); my $statement_handle = $db->prepare('SELECT * FROM mytable'); # Теперь эта команда готова к выполнению. My...
DBI quote
DBI::quote $quoted_string = $db->quote($string); DBI::quote принимает строку для использования в качестве запроса SQL и возвращает ее копию с правильно расставленными для ввода в запрос ка...
Пример
Пример use DBI; my $db1 = DBI->connect('DBI:mSQL:mydata',undef,undef); my $db2 = DBI->connect('DBI:mysql:myotherdata','me','mypassword'); my $string = "Sheldon's Cycle"; my $...
DBI rows
DBI::rows $number_of_rows = $statement_handle->rows; Del: : rows возвращает число строк данных, содержащихся в описателе команды. Для DBD::mSQL и DBD::mysql эта функция дает точное число д...
Пример
Пример use DBI; my $db = DBI->connect('DBI:mSQL:mydata',undef,undef); my $query = "SELECT name, date FROM myothertable WHERE name='Bob'"; my $myothertable_output = $db->prepa...
DBI state
DBI::state $sql_error = $handle->state; DBI: : state возвращает код ошибки SQL SQLSTATE последней по времени ошибки DBI. В данное время DBD::mSQL и DBD^mysql сообщают 'S1000' для всех ошиб...
Пример
Пример Use OBI; my $db = DBI->connect('DBI:mysql:mydata','webuser','super_secret_squirгеl'); my $sql_error = $db->state; warn("BoT последняя по времени ошибка DBI SQL: $sql_error&...
DBI trace
DBI::trace DBI->trace($trace_level) DBI->trace($trace_level, $trace_file) $handle->trace($trace_level); $handle->trace($trace_level, $trace_file); DBI:: trace используется в осно...
Пример
Пример use DBI; my $db1 = DBI->connect('DBI:mysql:mydata','webuser','super_secret_squirrel'); my $db2 = DBI->connect('DBI:mSQL:myotnerdata',undef,undef); DBI >trace(2); # Включена тр...
DBI commit DBI rollback DBI ping
DBI::commit, DBI::rollback, DBI::ping $result = $db->commit; $result = $db->rollback; Sresult = $db->ping; DBI: :commit и DBI: : rollback полезны только при работе с серверами, подд...
Атрибуты
Атрибуты $db->{AutoCommit} $handle->{ChopBlanks} $handle->{CompatMode} $handle->{InactiveDestroy} $handle->{LongReadLen} $handle->{LongTruncOk} $handle->{PrintError} $...
Пример
Пример use DBI; my $db = DBI->connect('mysql:mydata','me','mypassword'); $db->{RAISE_ERROR} = 1; # Теперь любая ошибка DBI/DBD убьет программу. my $statement_handle = $db->prepare...
Msql pm API
Msql.pm API...
Use Msql
use Msql use Msql; Это объявление должно быть в любой программе Perl, использующей модуль Msql.pm....
Msql connect
Msql::connect $db = Msql->connect; $db = Msql->connect($host); $db = Msql->connect($host, Sdatabase); Устанавливает соединение между вашей программой на Perl и сервером Msql. У этой...
Пример
Пример use Msql; # Соединение с сокетом Unix локального узла ' my $db = Msql->connect; # Или... # Соединение с узлом 'www.myserver.com' без указания, базы данных mу $db = Msql->connect...
Msql createdb
Msql::createdb $result = $db->createdb($database); Msql: : createdb создает базу данных, имя которой принимает в качестве аргумента. Запрос на создание посылается серверу mSQL. Команда посы...
Пример
Пример use Msql; my $db = Msql->connect; my $my_new_database = 'mynewdata'; my $result = $db->createdb($my_new_database); die "База данных не создана!" if $result == -1;...
Msql database
Msql::database $database = $db->database; Msql: database возвращает имя текущей базы данных как скаляр. Функция возвращает undef, если нет выбранной базы данных....
Пример
Пример use Msql; my $db = Msql->connect('www.myserver.com','mydata'); my $database = $db->database; print "Здесь должно быть выведено 'mydata': $database\n";...
Msql dropdb
Msql::dropdb $result = $db->dropdb($database); Msql: :dropdb принимает в качестве аргумента имя базы данных, которую нужно удалить. Затем она посылает запрос на удаление серверу mSQL. Коман...
Пример
Пример use Msql; my $db = Msql->connect; my $result = $db->dropdb('mydata'); die "Команда не выполнена!" if result == -1; print "'mydata' потеряна навсегда.\n";...
Msql errmsg
Msql::errmsg $error = $db->errmsg: Msql::errmsg возвращает последнюю по времени ошибку сеанса работы с сервером mSQL. Значение сохраняется, пока не произойдет следующая ошибка, и тогда заме...
Пример
Пример use Msql; my $db = Msql->connect; my Serror = $db->errmsg; warn("Вот последняя по времени ошибка mSQL: $error");...
Msql getsequenceinfo
Msql::getsequenceinfo ($step, $value) = $db->getsequenceinfo($table); Msql: :getsequenceinfo принимает в качестве аргумента имя таблицы. Функция возвращает шаг и значение последовательност...
Пример
Пример use Msql; my $db = Msql->connect; my ($step, $value) = $db->getsequenceinfo('mytable'); die "B mytable не задана последовательность" if not $step; print "B myta...
Msql host
Msql::host Shost = $db->host; Msql: :host возвращает имя узла сервера базы данных как скаляр. Не гарантируется возврат канонического или хотя бы полностью квалифицированного доменного имени...
Пример
Пример use Msql; my $ijh - Msql->connect( 'www.myserver.com'); my $host = $db->host; print "Вероятно, вы видите 'www.myserver.com': $host\n";...
Msql listdbs
Msql::listdbs @databases = $db->listdbs; Msql: :listdbs возвращает список имеющихся на сервере баз данных. Если баз данных нет, она возвращает пустой массив....
Пример
Пример use Msql; my $db = Msql->connect; my @databases = $db->listdbs; print "Имеющиеся базы данных:\n\n" . join("\n",@databases);...
Msql listfields
Msql::listfields $fields = $db->listfields($table); Msql:: listf ields принимает в качестве аргумента имя таблицы в текущей базе данных. Она возвращает ссылку на объект, который содержит им...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $fields = $db->listfields('mytable'); warn ("Проблемы с 'mytable-': " . $db->errmsg) if (not $fiel...
Msql listindex
Msql::listindex @index_handles = $db->listindex($table,$index); Msql: : listindex принимает в качестве аргументов имена таблицы и индекса и возвращает массив описателей команд, содержащих...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $mytable_fields = $db->listfields('mytable'); my @indices = $mytable_fields->listindices; # Я знаю имена в...
Msql listtables
Msql::listtables @tables = $db->listtables; Msql: :listtables возвращает массив таблиц, имеющихся в базе данных. Если в базе данных нет таблиц, функция вернет пустой массив....
Пример
Пример use Msql; my $db = Msql->connect; my @tables = $db->listtables; my $database = $db->database; print "B $database есть следующие таблицы:\n\n" join("\n",@t...
Msql query
Msql::query $query_output = $db->query($sql_statement); Msql::query является самой важной и наиболее часто используемой функцией в Msql.pm API. В действительности вы посылаете SQL-запросы...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $query1 = "SELECT * FROM mytable"; my $query2 = "SELECT name, date FROM myothertable WHERE name LIK...
$Msql QUIET
$Msql::QUIET Если переменная $Msql: : QUIET установлена в true, то параметр -w в Perl отключает вывод ошибок. В противном случае все ошибки MsqlPerl будут автоматически посылаться на STDERR. П...
Пример
Пример use Msql; # Отключить сообщения об ошибках. Действует, только если сценарий # запущен с '-w'. $Msql::QUIET = 1; # Выполняем многословную часть... # Снова включаем сообщения об ошиб...
Msql quote
Msql::quote $quoted_string = $db->quote($string); $truncated_quoted_string = $db->quote($string,$length); Msql: :quote принимает в качестве аргумента скалярную строку. Она возвращает ту...
Пример
Пример use Msql; my $db = Msql->connect; my $string = "Это ' (одинарная кавычка)"; my $qstring = $db->quote($string); print qq%Tenepb значение строки "'Это\\' (одинарна...
Msql selectdb
Msql::selectdb $db->selectdb($database); Msql: :selectdb выбирает базу данных на сервере. В случае неуспеха в Msql: :errmsg помещается ошибка. Единственный действенный способ проверить успе...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); # Выбранной базой данных является 'mydata' if ($db->database ne 'mydata') { wаrn('Базу данных выбрать не удалось!...
Msql shutdown
Msql::shutdown $result = $db->shutdown; Msql: : shutdown посылает на сервер mSQL команду остановки. Команда посылается от имени пользователя, запустившего программу, поэтому для использован...
Пример
Пример use Msql; my $db = Msql->connect; # Пора закрывать базу данных... my $result = $db->shutdown; die "Команда не выполнена!" if $result — -1; print "Сервер остан...
Msql Statement as_string
Msql::Statement::as_string $formatted_table = $statement_handle->as_string; Msq1: :Statement: :as_string возвращает данные, содержащиеся в описателе команды, в виде аккуратно отформатирова...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $query = "SELECT * FROM mytable"; my $mytable_output = $db->query($query); print "Моя таблица:...
Msql Statement dataseek
Msql::Statement::dataseek $statement_handle->dataseek($row_number); Msql: :Statement: :dataseek принимает в качестве аргумента номер строки. Функция переустанавливает данные, так что следую...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my Squery = "SELECT name, date FROM myothertable"; my $myothertable_output = $db->query($query); my @na...
Msql Statement fetchcol
Msql::Statement::fetchcol @column_of_data = $statement_handle->fetchcol($column_number); Msql: :Statement: :fetched принимает в качестве аргумента номер колонки и возвращает массив всех зн...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $query = "SELECT name, date FROM myothertable WHERE name LIKE 'Bob%'"; my $myothertable_output = $db->...
Msql Statement fetchhash
Msql::Statement::fetchhash %hash ='$statement_handle->fetchhash; Msql::Statement: :fetchhash возвращает текущую строку описателя команды как ассоциативный массив (или хэш). Ключами хэша слу...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $query = "SELECT * FROM mytable"; my $mytable_output = $db->query($query); my %first_data_row = $my...
Msql Statement fetchrow
Msql::Statement::fetchrow @row_of_data = $statement_handle->fetch row; Msql:: Statement: : fetch row возвращает очередную строку данных из описателя команды, созданного Msql:.-query. Каждо...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $query1 = "SELECT * FROM mytable"; my $query2 = "SELECT name, date FROM myothertable WHERE name LIK...
Msql Statement isnotnull
Msql::Statement::isnotnull @not_null = $statement_handle->isnotnull; Msql:: Statement: :isnotnull возвращает список булевых значений, указывающих для каждой из содержащихся в описателе ком...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my Soutput = $db->query("select * from mydata"); my @names = $output->name; my @not_null = $output-...
Msql Statement isnum
Msql::Statement::isnum @numbers = $statement_handle->isnum; Msql: : Statement: : isnum возвращает список булевых значений, указывающих для каждой из содержащихся в описателе команды колонки...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $output = $dD->query("select name, date from myothertable"); print "Name является числом" i...
Msql Statement isprikey
Msql::Statement::isprikey @primary_key = $statement_handle->isprikey; Msq1::Statement: :isprikey возвращает список булевых значений, указывающих для каждой из содержащихся в описателе кома...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $output-= $db->query("select * from mytable"); my @prikeys = $output->isprikey; my $number_of_pri...
Msql Statement length
Msql::Statement::length @lengths = $statement_handle->length; Msql::Statement::length возвращает список максимально возможных длин для колонок, содержащихся в описателе команды. Это значени...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $output = $db->query("select- * from mytable"); my @types = $output->type; my @lengths = $output...
Msql Statement listindices
Msql::Statement::listindices Pindices = $statement_handle->listindices; Msql: : Statement: :listindices возвращает индексы, связанные с какими-либо полями в описателе команды. Поскольку фун...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $mytable_fields = $db->listfields('mytable'); my ©indices = $mytable_fields->listindices; print "...
Msql Statement maxlength
Msql::Statement::maxlength @max_lengths = $statement_handle->maxlength; ' Msql::Statement: :maxlength возвращает список фактических максимальных размеров всех полей таблицы. При вызове в...
Пример
Пример use Msql; $db = Msql->connect; $db->selectdb('mydata'); my Soutput = $db->query('select name, date from myothertable'); print "Самое длинное имя имеет длину " . $o...
Msql Statement name
Msql::Statement::name @column_names = $statement_handle->name; Msql:: Statement:: name возвращает имена колонок данных, содержащихся в описателе команды. При вызове в скалярном контексте ф...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $output = $db->query("select * from mytable"); my @column_names = $output->names; # Теперь @colu...
Msql Statement numfields
Msql::Statement::numfields $number_of_fields = $statement_handle->numfields; Msql:: Statement: : numf ields возвращает число полей в каждой строке результирующих данных, содержащихся в опи...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $output = $db->query("select * from mytable"); my $numfields = $output->numfields; my $numrows =...
Msql Statement numrows
Msql::Statement::numrows $number_of_rows = $statement_handle->numrows; Msql: : Statement: : numrows возвращает число строк, содержащихся в описателе команды. Для описателя, который не може...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my Soutput = $db->query("select * from mytable"); my $numrows = '$output->numrows; print "B 'm...
Msql Statement table
Msql::Statement::table @tables = $statement_handle->table; Msql: :Statement: :table возвращает список таблиц, связанных с колонками данных, содержащимися в описателе команды. (См. выше в Ms...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my Soutput = $db->query('select myothertable. name, myothertable.date, mythirdtable. name from myothertable, mythi...
Msql Statement type
Msql::Statement::type @column_types = $statement_handle->type; Msql: : Statement: : type возвращает типы колонок данных, содержащихся в описателе команды. При вызове в скалярном контексте...
Пример
Пример use Msql; my $db = Msql->connect; $db->selectdb('mydata'); my $output = $db->query("select name, date from myothertable"); my ($name_type, $date_type) = $output-&g...
Msql sock
Msql::sock $sock = $db->sock; Msql::sock возвращает скаляр, содержащий номер сокета, использованного для подключения к серверу mSQL. Обычно это полезно только при действительно изощренном п...
Пример
Пример use Msql; my $db = Msql->connect; my $sock = $db->sock; print "Я подключен к сокету $sock.\n";...
Msql *_TYPE
Msql::*_TYPE Msql.pm предоставляет следующие функции, соответствующие типам данных mSQL: &Msql::CHAR_TYPE &Msql::INT_TYPE &Msql::REAL_TYPE &Msql::IDENT_TYPE &Msql::TEXT_TYP...
Пример
Пример use Msql; %types = ( 'CHAR' => &Msql::GHAR_TYPE, 'INT' => &Msql::INT_TYPE, 'REAL' => &Msql::REAL_TYPE, 'SYSVAR' => &Msql::SYSVAR_TYPE, 'TIME' => &Msq...
$Msql VERSION
$Msql::VERSION В переменной $Msql:: VERSION содержится номер версии модуля Msql.pm....
Пример
Пример use Msql; print "Вы используете Msql.pm версии $Msql::VERSION.\n";...
Mysql pm API
Mysql.pm API Mysql.pm API идентичен Msql API (с заменой всюду «Msql» на «Mysql»), за исключением следующих отличий:...
Mysql connect
Mysql::connect $db = Mysql->connect($host, Sdatabase, $user, $password); Помимо трех методов соединения, совпадающих с Msql: :connect , в Mysql:: connect есть четвертый метод, требующий пе...
Пример
Пример use Mysql; $db = Mysql->connect(undef,'mydata','webuser1, 'super_secret_squirrel'); # Теперь описатель базы данных соединен с локальным сервером MySQL и # использует базу данных 'm...
Mysql errno
Mysql::errno $error_number = $db->errno; Mysql: :errno возвращает код последней ошибки. Код соответствует сообщению об ошибке, возвращаемому Msql: : errmsg ....
Пример
Пример use Mysql; my $db = Mysql->connect(undef,'mydata','webuser', 'super_secret_squirrel'); # В этом запросе есть синтаксическая ошибка... my $output = $db->query( 'SELECT * from myd...
Mysql FIELD_TYPE_*
Mysql::FIELD_TYPE_* Помимо функций типов данных Mysql: :TYPE_ *, идентичных функциям Msql::TYPE *, Mysql.pm предоставляет следующие дополнительные функции типов данных: &Mysql::FIELD_TYPE_...
Пример
Пример use Mysql; my $db = Mysql->connect(undef, 'mydata'); my Soutput = $db->query("SELECT name, data from myothertable"); if ($output->type->[0] = &Mysql::FIELD_...
Mysql Statement affectedrows
Mysql::Statement::affectedrows $number_of_affected_rows = $statement^handle->affectedrows; Msql: :Statement: :affectedrows возвращает число строк, обработанных запросом. Эта функция полезна...
Пример
Пример use Mysql; my $db = Mysql->connect(undef,'mydata'); my $output = $db->query("UPDATE mytable set name='bob' where name='joe'"); print $output->affectedrows . "...
Mysql Statement info
Mysql::Statement::info $info = $sth->info; Mysql: : Statement:: info возвращает дополнительные результаты некоторых запросов, для которых в Mysql.pm нет специальных функций, таких как ALTER...
Пример
Пример use Mysql; $db = Mysql->connect(undef,'mydata'); my $output = $db->query("LOAD DATA INFILE 'mydata.dat' INTO TABLE mytable"); my $info = $output->info($output); pri...
Mysql Statement insertid
Mysql::Statement::insertid $new_id = $statement_handle->insertid; Функция Mysql::Statement::insertid возвращает текущее значение поля auto_increment (если такое имеется) в таблице. Если в т...
Пример
Пример use Mysql; my $db = Mysql->connect(undef,'mydata'); my $output = $db->query( "INSERT into mytable (id, name, date) VALUES ('','bob', 'today')"; my $new_id = $output-...
Mysql Statement isblob
Mysql::Statement::isblob @blobs = $statement_handle->isblob; Mysql: : Statement:: isblob возвращает список булевых значений, указывающих на то, имеют ли содержащиеся в описателе команды пол...
Пример
Пример use Mysql; $db = Mysql->connect(undef,'mydata'); my $output = $db->query('SELECT name, data from myothertable'); if ($output->isblob->[0]) { print "Name является по...
Mysql query
Mysql::query В отличие от MsqLpm, Mysql.pm возвращает описатель команды даже для запросов, не являющихся командами SELECT, например, для запросов INSERT, UPDATE и DELETE....
Пример
Пример use Mysql; my $db = Mysql->connect(undef,'mydata'); my $outpuf= $db->query("UPDATE mytable set name='joe' where name='bob' "); # $output является описателем команды....








- Начало -