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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Имя константы из значения переменной. Создать константу имя которой в переменн 
:(
    Опции темы
nevsky
Дата 30.10.2006, 13:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Всем привет.

Возникла такая проблема, не знаю как решить.
Надо создать константу имя которой хранится в переменной.
Т.е.

#!/usr/bin/perl -w

%hash = ( 'key1', 'value1', 'key2', 'value2', 'key3', 'value3' );

foreach $key (sort keys %hash) {
#   print "$key\n";
   use constant $key => "VALUE";
}

print key1;

должно напечатать: VALUE
 smile 
PM MAIL   Вверх
DiverD
Дата 30.10.2006, 15:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


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

Репутация: 1
Всего: 2
http://forum.vingrad.ru/topic-111014/unrea...tant/index.html
http://perlmonks.org/?node=use+constant


Это сообщение отредактировал(а) DiverD - 30.10.2006, 15:17
--------------------
[ FreeBSD & pERL p0WER eVERY dAY ]
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

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

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


 




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


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

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