Forum Webscript.Ru

Программирование => Perl => Тема начата: max2003 от 26 Июня 2003, 21:18:52

Название: Операции с файлом
Отправлено: max2003 от 26 Июня 2003, 21:18:52

Господа!!!

Есть файл с таким текстом:

30;76;89;58;99
88;62;79;18;95
14;63;69;62;39
64;61;93;51;96

считать файл разделенный ( ; ) допустим реально, но вопрос в другом, как мне сложить допустим все вторые столбцы в строках между собой????

Заранее Благодарен.

Название: Операции с файлом
Отправлено: C++ от 26 Июня 2003, 21:57:06

Читаешь весь файл в массив
затем разбиваешь каждэй елемент массива на значения и пишешь их  в двухмерный массив. затем складываешь те значения, которые нужны:)

Название: Операции с файлом
Отправлено: Wyclef от 26 Июня 2003, 23:07:01

Код: [Выделить]

open F, "file.txt";
my @lines = ;

my $result;
foreach (@lines) {
my @values = split /;/;
$result += $values[1];
}

print $result;

Название: Операции с файлом
Отправлено: max2003 от 01 Июля 2003, 19:17:41

Спасибо ОГРОМНОЕ......