Memory problem - Urgent - please help.
Von: news.ntua (root@localhost.com) [Profil]
Datum: 31.07.2007 00:15
Message-ID: <f8lnuu$clj$1@ulysses.noc.ntua.gr>
Newsgroup: alt.perl
Datum: 31.07.2007 00:15
Message-ID: <f8lnuu$clj$1@ulysses.noc.ntua.gr>
Newsgroup: alt.perl
cpu = intel xeon 64bit
os = Redhat AS 4 update 5, 64bit
physical memory = 8 GB
perl v5.8.5 (the one of Redhat)
I have great problem. At first I thought everything was ok because the
program was running, but I notice it was getting slower and slower ...
I did a "watch cat /proc/meminfo" and notice that from 8GB free mem after
some time, I end up with 14kb ....
I start searching ..and I found that the problem was at this line
('gzip...') and at a `cp ...` some lines earlier.
...
foreach (grep $_=~$filter_original_files, readdir DIR)
{
...
`gzip --force --decompress "$temp_directory/$_"`;
...
}
...
The files I parse are hundrends , their uncompressed size is over of 100 Gb
, but this should not be problem. At every iteration I notice that I am
loosing as much memory as the uncompressed file is .
This should happen. I tried also:
system("command ...")
open(SHELL, "command -|")
eval { ... }
do { .... }
qx/command &/;
fork
also fork at shell with `( command )`;
Nothing helped. Whenever I do a `shell` command, its memory added to Perl
process and does not get released after shell finish its job.
Please help, (fast) because I wont have my head for on my shoulders for much
more time (no joking).
[ Auf dieses Posting antworten ]Antworten
- Paul Lalli (31.07.2007 04:37)
- Mumia W. (31.07.2007 05:14)
