Создание строкового литерала (qoute)
Назначение
Метод quote возвращает экранированный в соответствии с правилами языка SQL СУБД ЛИНТЕР строковый литерал для последующего его использования в качестве элемента генерируемого клиентским приложением текста SQL-запроса.
Пакет
Package Linter::db
Прототип
$sql = $dbh- >quote($value); $sql = $dbh- >quote($value, $data_type);
| Параметр | Описание | |
|---|---|---|
| $value | Строковый Perl-литерал | |
| $data_type | Тип данных символьного представления возвращаемого литерала |
Возвращаемые значения
| Переменная | Описание | |
|---|---|---|
$sql | Строковый литерал, экранированный в соответствии с языком SQL СУБД ЛИНТЕР | |
$DBI::errstr | Диагностическое сообщение (в случае ошибки) |
Пример
my $dbh = $drh- >connect("DEMO", "SYSTEM", "MANAGER8")
or die "Could not connect to database: " . DBI- >errstr;
$dbh- >do("create or replace table TEST_TABLE(inches varchar(16));");
my $sql = sprintf("insert into TEST_TABLE values (%s);",
$dbh- >quote("15''"));
$dbh- >do($sql);
my $sth = $dbh- >prepare("select * from TEST_TABLE");
$sth- >execute();
my $data = $sth- >fetchrow_arrayref();
print($data- >[0]);
$dbh- >do("drop table TEST_TABLE;");
$sth- >finish();
$dbh- >disconnect();