Имеется большой текстовый sql-файл (400 мб).
Требуется открыть этот файл чтобы вынуть из серидины приличный кусок и вставить его в другой файл.
Но этот файл не открывается из Perl из-за нехватки памяти - программа прерывается.

Открывал так:
open(FILE, "<$filename");
@data = <FILE>;
close(FILE);

и так:
$data = `cat $filename`;

Присоветуйте, как быть в такой ситуации!
Может его порезать на части? Не знаю чем.

• обработка большого файла,ovax, 07:57 , 13-Авг-04

>Имеется большой текстовый sql-файл (400 мб).
>Требуется открыть этот файл чтобы вынуть из серидины приличный кусок и вставить
>его в другой файл.
>Но этот файл не открывается из Perl из-за нехватки памяти - программа
>прерывается.
>
>Открывал так:
>open(FILE, "<$filename");
>@data = <FILE>;
>close(FILE);
>
>и так:
>$data = `cat $filename`;
>
>Присоветуйте, как быть в такой ситуации!
>Может его порезать на части? Не знаю чем.

надо просто файл читать посторочно

while ($line=<FILE>)
{
...
}