Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RFpro.ru: Программирование на языке Perl


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный ХОСТИНГ на базе Linux x64 и Windows x64

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Лучшие эксперты по данной тематике

Коцюрбенко Алексей aka Жерар
Статус: Академик
Рейтинг: 3886
∙ повысить рейтинг »
Абаянцев Юрий Леонидович aka Ayl
Статус: Профессионал
Рейтинг: 2088
∙ повысить рейтинг »
Хватов Сергей
Статус: Академик
Рейтинг: 609
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И СОФТ / Программирование / Perl (Перл)

Номер выпуска:137
Дата выхода:04.04.2012, 07:00
Администратор рассылки:Коцюрбенко Алексей aka Жерар (Академик)
Подписчиков / экспертов:64 / 16
Вопросов / ответов:3 / 4

Консультация # 99012: Скажите пожалуйста, как в перле написать SQL запрос с параметрами???...


Консультация # 48065: У меня следующий вопрос относительно вложенности оператора if, согласно описанию (и применительно например к паскалю) можно написать так: if (выражение) {БЛОК} else if (выражение) {БЛОК} else if (выражение) {БЛОК} else {БЛОК} Но вот у меня при таком (примерно) написании выскакивает синтаксическая ошибка, в чем дело? Где я ошиб...
Консультация # 10504: Здравствуйте! Подскажите пожалуйста, как в Perl можно сделать следущее: Этот скрипт открывал бы другой скрипт, но тот кто запускал бы его не видел адреса второго скрипта и то, что выводит другой скрипт также не было бы у пользователя. Например: Скрипт А-который надо сделать Скрипт Б-после ввода данных методом get открывается ст...

Консультация # 99012:

Скажите пожалуйста, как в перле написать SQL запрос с параметрами???

Дата отправки: 20.08.2007, 13:32
Вопрос задал: Татьяна Ильинична
Всего ответов: 1
Страница онлайн-консультации »


Консультирует dianacode:

Доброе время суток, Татьяна Ильинична

используйте для этого заполнители, если вы, конечно, их имели ввиду:

use DBI;

my $db = DBI->connect("DBI:mysql:dbname:dbhost",\'login\',\'password\') or die DBI->errstr;
$db->do("SET NAMES cp1251");

my $dbh = $db -> prepare("select * from logon where vkey = ?");
$dbh -> execute($regionalauth);
$user_logon = $dbh -> fetchrow_hashref;

более подробно здесь http://search.cpan.org/~capttofu/DBD-mysql-4.005/lib/DBD/mysql.pm

Консультировал: dianacode
Дата отправки: 20.08.2007, 13:49
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультация # 48065:

У меня следующий вопрос относительно вложенности оператора if,
согласно описанию (и применительно например к паскалю) можно написать так:
if (выражение) {БЛОК} else
if (выражение) {БЛОК} else
if (выражение) {БЛОК} else {БЛОК}
Но вот у меня при таком (примерно) написании выскакивает синтаксическая ошибка, в чем дело? Где я ошибся?
Листинг примерной программы приведен в низу.... (у меня ошибка указывате на 5 строку)
Спасибо за внимание.

Дата отправки: 03.07.2006, 23:05
Вопрос задал: Lperw
Всего ответов: 2
Страница онлайн-консультации »


Консультирует PaveL SvetlY:

Здравствуйте, Lperw!
Дело в том, что в Perl строгий синтаксис написания if else:
if (условие) {операции} else {операции}.
Другими словами, {} после else обязательны.

Консультировал: PaveL SvetlY
Дата отправки: 04.07.2006, 10:07
Рейтинг ответа:

НЕ одобряю 0 одобряю!


Консультирует -OC- (Специалист):

Здравствуйте, Lperw!
Естественно у вас в данном случае совершенно неправильное использование оператора if.
правильно ( синтаксически) одно из:
if (EXPR) BLOCK
if (EXPR) BLOCK else BLOCK
if (EXPR) BLOCK elsif (EXPR) BLOCK ...
if (EXPR) BLOCK elsif (EXPR) BLOCK ... else BLOCK

в вашем случае можно сделать так (см приложение)
или так:

SWITCH: {
if ($my_num < $num) {print "Недобор.\n";last SWITCH;}
if ($my_num > $num) {print "Перебор.\n";last SWITCH;}
print "Угадал!!!\n";
}

Приложение:

Консультировал: -OC- (Специалист)
Дата отправки: 04.07.2006, 10:23
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультация # 10504:

Здравствуйте!
Подскажите пожалуйста, как в Perl можно сделать следущее:
Этот скрипт открывал бы другой скрипт, но тот кто запускал бы его не видел
адреса второго скрипта и то, что выводит другой скрипт также не было бы у
пользователя.
Например:
Скрипт А-который надо сделать
Скрипт Б-после ввода данных методом get открывается страница (которая весит
около 1 мб)
Запустив скрипт А я пишу в строке ввода адрес с данными второго скрипта, а
страница и адрес скрипта Б не должны быть видны.
Заранее спасибо.

Дата отправки: 01.01.2004, 00:01
Вопрос задал: Roman
Всего ответов: 1
Страница онлайн-консультации »


Консультирует Student:

Доброе время суток, Roman!
Запустить скрипт Б из скрипта А можно, например так:
#!/usr/bin/perl
#скрипт А.cgi;
system ("perl Б.cgi");
если скрипт А.cgi будет генерировать какую-то хтмл страницу, то адрес скрипта Б.cgi виден на ней не будет (если конечно Вы сами его там не напишете).
Чтобы передать какие-либо данные в скрипт Б можно сделать например так: Вы вводите данные в хмтл форму, которая генерируется скриптом А, данные пересылаются в скрипт А, там эти данные присваиваются каким-либо переменным, и эти переменные записываются в строку вызова скрипта Б:
system("perl Б.cgi?var1=$var1&var2=$var2&var3=$var3");
Удачи!

Консультировал: Student
Дата отправки: 01.01.2004, 00:01
Рейтинг ответа:

НЕ одобряю 0 одобряю!


Оценить выпуск | Задать вопрос экспертам

главная страница  |  стать участником  |  получить консультацию
техническая поддержка  |  восстановить логин/пароль

Дорогой читатель!
Команда портала RFPRO.RU благодарит Вас за то, что Вы пользуетесь нашими услугами. Вы только что прочли очередной выпуск рассылки. Мы старались. Пожалуйста, оцените его. Если совет помог Вам, если Вам понравился ответ, Вы можете поблагодарить автора - для этого в каждом ответе есть специальные ссылки. Вы можете оставить отзыв о работе портале. Нам очень важно знать Ваше мнение. Вы можете поближе познакомиться с жизнью портала, посетив наш форум, почитав журнал, который издают наши эксперты. Если у Вас есть желание помочь людям, поделиться своими знаниями, Вы можете зарегистрироваться экспертом. Заходите - у нас интересно!
МЫ РАБОТАЕМ ДЛЯ ВАС!



В избранное