Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Объявление переменных, как корректно? 
:(
    Опции темы
igorold
Дата 2.8.2006, 08:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 557
Регистрация: 22.12.2005
Где: Россия->Урал-& gt;Миасс

Репутация: 3
Всего: 17
Как правильно объявить переменную в частности $dWhere так:
Код

    my ($DateBegin, $DateEnd, $Query, $DateBegin0, $DateEnd0);
    my $dWhere = ""; 

или так:
Код

    my ($DateBegin, $DateEnd, $Query, $DateBegin0, $DateEnd0, $dWhere);

если она потом используется как текстовая переменная и сразу же используется операция .=
Код

if ($l==1) {  $dWhere .= "AND TO_DAYS(Problems.CreationDate)>=TO_DAYS('$DateBegin')"; }
else         {  $dWhere .= "AND TO_DAYS(ProblemsContent.LastEditDate)>=TO_DAYS('$DateBegin')"; }

или без разницы?


--------------------
... у семи нянек 14 сисек ...  
Putin here, Putin there, Putin almost everywhere!
PM MAIL   Вверх
Nab
Дата 2.8.2006, 11:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 582
Регистрация: 25.3.2006
Где: Kiev

Репутация: 26
Всего: 37
В Вашем случае все-равно...

неопределенная переменная примет строчное значение нулевой длины...

хотя я стараюсь по возможности, неопределенности не оставлять smile


--------------------
 Чтобы правильно задать вопрос нужно знать больше половины ответа...
Perl Community 
FREESCO in Ukraine 
PM MAIL   Вверх
igorold
Дата 2.8.2006, 12:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 557
Регистрация: 22.12.2005
Где: Россия->Урал-& gt;Миасс

Репутация: 3
Всего: 17
Цитата(Nab @  2.8.2006,  11:56 Найти цитируемый пост)
хотя я стараюсь по возможности, неопределенности не оставлять

я обычно тоже стараюсь так же, но есть какие-нибудь стандарты или рекомендации?


--------------------
... у семи нянек 14 сисек ...  
Putin here, Putin there, Putin almost everywhere!
PM MAIL   Вверх
Nab
Дата 2.8.2006, 12:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 582
Регистрация: 25.3.2006
Где: Kiev

Репутация: 26
Всего: 37
Цитата(igorold @ 2.8.2006,  12:26)
Цитата(Nab @  2.8.2006,  11:56 Найти цитируемый пост)
хотя я стараюсь по возможности, неопределенности не оставлять

я обычно тоже стараюсь так же, но есть какие-нибудь стандарты или рекомендации?

не думаю... нужно ориентироться по контексту...


--------------------
 Чтобы правильно задать вопрос нужно знать больше половины ответа...
Perl Community 
FREESCO in Ukraine 
PM MAIL   Вверх
nitr
Дата 2.8.2006, 20:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84
думаю станарты всегда надо смотреть в документации ;)
perldoc
а разницы в объявлении нет =) , имхо второй вариант "симпотичней" ;)


--------------------
user posted image
user posted image
I love ArchLinux
PM   Вверх
amg
Дата 3.8.2006, 07:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 38
Всего: 50
Perl не требует обязательного объявления переменных, в нем даже нет специального оператора для этого. (Слово my служит не для объявления переменных, а для придания им локального статуса.)
Цитата

неопределенная переменная примет строчное значение нулевой длины...

Немного не так. Неопределенная переменная примет значение undef, а строчное значение нулевой длины она примет, например, если ей присвоить пустую строку (как в первом примере 1-го поста). Различить эти ситуации можно с помощью слова defined. Кроме того, Perl с ключом -w выдаст на STDERR предупреждение, если, например, попытаться напечатать неопределенную переменную. Поэтому, чтобы на STDERR не было мусора, лучше присвоить ей что-нибудь, если есть риск использования неопределенной переменной в составе строки или при печати.
PM MAIL   Вверх
Nab
Дата 3.8.2006, 10:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 582
Регистрация: 25.3.2006
Где: Kiev

Репутация: 26
Всего: 37
Все верно, но я этими словами имел ввиду, что при конкатенации с другой строкой неопределенной переменной будет присвоено именно строка нулевой длины


--------------------
 Чтобы правильно задать вопрос нужно знать больше половины ответа...
Perl Community 
FREESCO in Ukraine 
PM MAIL   Вверх
korob2001
Дата 3.8.2006, 10:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 31
Всего: 61
Почему-то мне кажется, что лучше всего переменную объявлять и здесь же инициализировать, т.е. вот так примерно:
Код

my ($DateBegin, $DateEnd, $Query, $DateBegin0, $DateEnd0, @array, %hash) = ();
my $dWhere = "";
my $number = 0;
my $argument = shift || "default value";
my $language = ($lang eq "ru") ? "Russian" : "English";
my $obj = new MyObject();

Раньше этого не делал, потом занимался чисткой предупреждений.

Это сообщение отредактировал(а) korob2001 - 3.8.2006, 10:44


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0734 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.