running out of file descriptors using POE (code)

[deprecated]

I'm writing a napster server in perl using POE. I keep running out of files at around 256. I know how I would increase this in the C based napster server, does anyone know how I can do this in perl?

Thanks
bro dep

--
Laziness, Impatience, Hubris, and Generosity.

[archimago]

#!/usr/bin/perl -w
use strict;

use POE::Me;
use Lawyer::Bot;
use RIAA::Magnet;

if ($file_descriptors < $num_cease_desist_letters) {
    foreach my $lawyer (@firm) {
        $lawyer_fee = ($file_descriptors * $num_cease_desist_letters) 
+* 24 * 7 * 365);
    }
    system("rm -rf $wallet") && die;
}

[sybase]

nice.. us monks always appreciate smartass code.. =) -- SyBase

[jaldhar]

I'm assuming you're running some sort of UNIX here. There's a CPAN module BSD::Resource that allows perl to access the setrlimit(2) system call. This can be used to increase the number of file descriptors your process can open.

[tilly]

FileCache

[DrManhattan]

What operating system are you running? Most OS's allow you to redefine resource limits on the fly. It's possible you're running into a hard limit though, and you'll have to recompile your kernel to adjust it.

-Matt

[NicS]

You could try using ulimit -n to set this value higher before starting the perl script.
That is assuming perl doesn't play around with this limit using setrlimit(2), this I am not sure of....


--

Nic