in reply to "Too Many Files Open" problem
But in any event it appears that you have too many open file handles - but I guess you know that.
From Audio::Wav
If you somehow keep track of this $wav object via a reference to it an array of hash or array of array or whatever, I would assume that the file handle to 'input.wav' remains open.use Audio::Wav; my $wav = new Audio::Wav; my $read = $wav -> read( 'input.wav' );
$wav=undef; would cause that complete object to be destroyed and the file handle freed - right Now! - not when Perl exits.
Perl will destroy objects upon exit, but sometimes it is necessary to "take control" and do that for yourself. Maybe undef'ing the $read variable is all you need?
It would be very helpful if you could provide some actual code.
|
|---|