ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     09 Sep 2002  00:30:37
 To : Dmitry Suhodoev
 Subject : Re: еще вопрос про указатели
 -------------------------------------------------------------------------------- 
 

 Здравствуй, Dmitry Suhodoev.
 
 DS> как делишки, Hаpод?
 
 DS> 1. как выpазить одной стpочкой?
 
 DS> my @res=read_db($start_date,$end_date);
 DS> my %bingo_data=%{shift(@res)};
 DS> my %costs=%{shift(@res)};
 DS> undef(@res);
 
 Hикак. У тебя на выходе два списка. Два непустых списка одним оператором
 проинициализировать невозможно. Если бы тебя устроили hash references,
 было бы можно.
 
 Да, разумеется, если твой вопрос понимать как "одним оператором" - одной
 строчкой-то никаких проблем :-)
 
 DS> 2. (можно не отвечать) почему, если написать:
 
 DS> my @res=read_db($start_date,$end_date);
 DS> my(%bingo_data,%costs)=(%{shift(@res)},%{shift(@res)});
 DS> undef(@res);
 
 DS> то все содеpжимое попадает в %bingo_data, а %costs ничего не достается?
 
 Потому что. А как ты предлагаешь определять границу, где закончились данные
 для %bingo_data и начались данные для %costs?
 
 -- 
 Artem Chuprina
 Communiware.net
 RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
 --- ifmail v.2.15dev5
  * Origin: Leninsky 45 home network (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    еще вопрос про указатели   Dmitry Suhodoev   07 Sep 2002 17:59:14   Re: еще вопрос про указатели   Artem Chuprina   09 Sep 2002 00:30:37