ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     15 Jan 2003  17:49:23
 To : "Alex Radich"
 Subject : Re: hash hashes ???
 -------------------------------------------------------------------------------- 
 

 Здравствуй, Alex Radich.
 
 AR> Hi All, (ssory, но впервый раз не отправилось)
 
 AR> Подскажите, pls, что я делаю не так? Как правильно заполнять сабж?
 
 AR> #!C:/Perl/bin/perl
 
 AR> $rec{ID}="01003";
 AR> $rec{STOREHOUSE}{WAREHOUSE}=1;
 AR> %{$byid{$rec{ID}}}=%rec; 
 
 Я бы писал $byid{$rec{ID}} = {%rec};
 
 AR> print "$byid{$rec{ID}}->{ID}\n";  
 AR> print "$byid{'01003'}{STOREHOUSE}{WAREHOUSE}\n\n";      
 AR> $rec{ID}="01009";
 AR> $rec{STOREHOUSE}{WAREHOUSE}=11;
 AR> %{$byid{$rec{ID}}}=%rec;
 
 AR> print "$byid{'01009'}->{ID}\n";
 AR> print "$byid{'01009'}->{STOREHOUSE}{WAREHOUSE}\n\n";  
 
 AR> print "$byid{'01003'}->{ID}\n";
 AR> print "$byid{'01003'}->{STOREHOUSE}{WAREHOUSE}\n\n";  
 
 А если стрелочки в принтах убрать - точно не заработает?
 
 -- 
 Artem Chuprina
 Communiware.net
 RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757
 --- ifmail v.2.15dev5
  * Origin: Leninsky 45 home network (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    hash hashes ???   Alex Radich   15 Jan 2003 16:56:40   Re: hash hashes ???   Artem Chuprina   15 Jan 2003 17:49:23   Re: hash hashes ???   Alex Radich   16 Jan 2003 11:11:45   Re: hash hashes ???   Artem Chuprina   16 Jan 2003 20:31:37