lib/perl/Ulimit/Ulimit.pm

   1 package Sherlock::Ulimit;
   2
   3 use 5.006;
   4 use strict;
   5 use warnings;
   6
   7 require Exporter;
   8 require DynaLoader;
   9
  10 our @ISA = qw(Exporter DynaLoader);
  11 unshift @DynaLoader::dl_library_path, "lib";
  12
  13 # Items to export into callers namespace by default. Note: do not export
  14 # names by default without a very good reason. Use EXPORT_OK instead.
  15 # Do not simply export all your public functions/methods/constants.
  16
  17 our $CPU = 0;
  18 our $FSIZE = 1;
  19 our $DATA = 2;
  20 our $STACK = 3;
  21 our $CORE = 4;
  22 our $RSS = 5;
  23 our $NPROC = 6;
  24 our $NOFILE = 7;
  25 our $MEMLOCK = 8;
  26 our $AS = 9;
  27
  28
  29 # This allows declaration       use Ulimit ':all';
  30 # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
  31 # will save memory.
  32 our %EXPORT_TAGS = ( 'all' => [ qw(
  33
  34 ) ] );
  35
  36 our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
  37
  38 our @EXPORT = qw(
  39 );
  40 our $VERSION = '0.01';
  41
  42 bootstrap Sherlock::Ulimit $VERSION;
  43
  44 # Preloaded methods go here.
  45
  46 1;
  47 __END__