1 # Perl module for setting process limits
3 # (c) 2003 Tomas Valla <tom@ucw.cz>
5 # This software may be freely distributed and used according to the terms
6 # of the GNU Lesser General Public License.
11 # Sherlock::Ulimit::setlimit( $resource, $softlimit, $hardlimit)
12 # Sherlock::Ulimit::getlimit( $resource, $softlimit, $hardlimit)
14 # setlimit sets limit to values supplied in softlimit and hardlimit
15 # getlimit reads limits into softlimit and hardlimit
16 # $resource constants are defined below
19 package Sherlock::Ulimit;
28 our @ISA = qw(Exporter DynaLoader);
29 unshift @DynaLoader::dl_library_path, "lib";
43 # This allows declaration use Ulimit ':all';
44 # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
46 our %EXPORT_TAGS = ( 'all' => [ qw(
50 our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
54 our $VERSION = '0.01';
56 bootstrap Sherlock::Ulimit $VERSION;
58 # Preloaded methods go here.