ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Konstantin Ryabov                    2:5020/400     25 Jun 2001  13:37:22
 To : All
 Subject : Re: Данные из файла!
 -------------------------------------------------------------------------------- 
 

 
 "Igor Ivlev" <Igor.Ivlev@p9.f116.n467.z2.fidonet.org> wrote in message
 news:993170766@p9.f116.n467.z2.FIDOnet.ftn...
 
 > Как поживаете, Andrey ?
 >
 >  Мои бортовые системы запеленговали, что в 20 июня 2001 19:15, Andrey Kr.
 
 писал
 
 > All:
 >
 >  AK> Кто знает подскажите как сделать такую штуку:
 >
 >  AK> - открыть файл в котором 2 столбика, разделенных табуляцией,
 
 например:
 
 >  AK> aaa    10
 >  AK> bbb    15
 >  AK> ccc    50
 >  AK> ddd    230
 > open (FILE, "file.txt");
 > @file=FILE;
 > close FILE;
 > foreach $text(@file){
 > @needed=split(/\t/, $text);
 > print "У нас на складе ".$needed[0].", в количестве ".$needed[1]." шт.\n"
 > }
 
 А если файл буде несколько мегов, у тебя получится отличная вешалка для
 компа.
 файл читать нужно построчно, или блоками, но не в коем случае сразу весь в
 массив.
 --- ifmail v.2.15dev5
  * Origin: MTU-Intel ISP (2:5020/400)
 
 

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