форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Архивированная нить - только для чтения!  Пред. тема | След. тема
Форумы Программирование под UNIX (Public)
Изначальное сообщение		[Проследить за развитием треда]

"Структуры в Перле"
Сообщение от Игорян on 11-Май-04, 17:26  (MSK)
Есть ли в Perl что то подобное структурам в С ? Нужно хранить данные из конфигурации, пример: HOST=mars,IP=1.1.1.1,NETMASK=1.1.1.1 HOST=mars,IP=1.1.1.1,NETMASK=1.1.1.1 В С я бы создал для каждой строки структуру, состаящей из 3 переменных, а как это делают в Perl? Если помещать все в массив, то это же не красиво и не удобно? Спасибо за совет.
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Индекс форумов | Темы | Пред. тема | След. тема

Сообщения по теме

1. "Структуры в Перле"
Сообщение от alchie (??) on 12-Май-04, 03:14  (MSK)
>Есть ли в Perl что то подобное структурам в С ? >Нужно хранить данные из конфигурации, пример: >HOST=mars,IP=1.1.1.1,NETMASK=1.1.1.1 >HOST=mars,IP=1.1.1.1,NETMASK=1.1.1.1 >В С я бы создал для каждой строки структуру, состаящей из 3 >переменных, >а как это делают в Perl? >Если помещать все в массив, то это же не красиво и не >удобно? > >Спасибо за совет. %hash = (HOST=>"mars", IP=>"1.1.1.1", NETMASK=>"1.1.1.1"); print $hash{'HOST'}; #даст "mars"
	Рекомендовать в FAQ | Cообщить модератору | Наверх

	2. "Структуры в Перле"
	Сообщение от Игорян on 12-Май-04, 11:54  (MSK)
	>>Есть ли в Perl что то подобное структурам в С ? >>Нужно хранить данные из конфигурации, пример: >>HOST=mars,IP=1.1.1.1,NETMASK=1.1.1.1 >>HOST=mars,IP=1.1.1.1,NETMASK=1.1.1.1 >>В С я бы создал для каждой строки структуру, состаящей из 3 >>переменных, >>а как это делают в Perl? >>Если помещать все в массив, то это же не красиво и не >>удобно? >> >>Спасибо за совет. > >%hash = (HOST=>"mars", IP=>"1.1.1.1", NETMASK=>"1.1.1.1"); > >print $hash{'HOST'}; #даст "mars" Бааальшое спасибо :-) Все получилось!
		Рекомендовать в FAQ | Cообщить модератору | Наверх

	3. "Структуры в Перле"
	Сообщение от ACCA (ok) on 17-Май-04, 20:32  (MSK)
	>%hash = (HOST=>"mars", IP=>"1.1.1.1", NETMASK=>"1.1.1.1"); > >print $hash{'HOST'}; #даст "mars" И чуть посложнее: my (%host, $h, $cfg); push $host{'mars'}, {IP=>"1.1.1.1", NETMASK=>"1.1.1.1"}; push $host{'mars'}, {IP=>"1.1.1.2", NETMASK=>"1.1.1.2"}; foreach $h (keys %host) {     print "$h\n";     foreach $cfg (@{ $host{$h} }) {        print "\t$$cfg{IP}\t$$cfg{NETMASK}\n";     } } man perldsc
		Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.