|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
31.01.2019, 17:33 | #1 |
Новичок
Джуниор
Регистрация: 19.04.2017
Сообщений: 2
|
perl dbi-метод selectall_arrayref('', \%attr)
Здравствуйте!
столкнулся с такой задачей от начальника - нужен отчет с названием полей из таблицы в БД . задача : через метод DBI selectall_arrayref() получить название полей из запроса select * from rep.report_history('авто'), но получить то смог, но последовательность при каждом запросе рандомная - отчет будет каждый раз выглядеть по-разному ... это важно тк структура таблицы может меняться вколачивать название полей и потом менять - нельзя. из документации взято https://metacpan.org/pod/DBI#selectall_arrayref $ary_ref = $dbh->selectall_arrayref($statement, \%attr, @bind_values); нужен способ (может в параметрах %\attr) чтоб поля из таблицы(запроса) в той же последовательности были и в отчете. вот кусок кода #!/usr/bin/perl use utf8; use DBI; #.... my $rep_aref = $dbh->selectall_arrayref("select * from portal.report('авто');", {Slice => {}} ) or die 'Ошибка получения данных! '.$DBI::errstr; # получаем название полей из таблицы по запросу foreach my $data (@{$rep_aref}) { @name_fileds = keys $data; # название полей в массив last; } print Dumper @name_fileds; # ??? #... |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Python vs Perl, Я выбрал Perl! Причина: а черт ее знает но наверное дело в философии и синтаксисе(TMTOWTDI ) | Sna1L | Perl | 0 | 13.12.2011 14:10 |
DBI-Builder | Rik | Софт | 0 | 20.06.2010 18:44 |
нужен скрипт на PERL для обработки текстовой информации (1251 кириллица, десетки тысяч строк) PERL | newbies | Perl | 7 | 03.08.2009 22:25 |