Added some headers to avoid confusion of our own developers ;)

diff --git a/lib/perl/Ulimit/Makefile b/lib/perl/Ulimit/Makefile
index 028481956199daf56238de5661bdac7fd19dfaac..a610ad6720087e40716120f3d7f33f7aa96cf71c 100644 (file)
--- a/lib/perl/Ulimit/Makefile
+++ b/lib/perl/Ulimit/Makefile
@@ -1,4 +1,4 @@
-# Perl modules
+# Makefile for the Ulimit Perl module  (c) 2003 Tomas Valla <tom@ucw.cz>
 
 DIRS+=lib/perl/Ulimit/arch/auto/Sherlock/Ulimit
 

diff --git a/lib/perl/Ulimit/Makefile.PL b/lib/perl/Ulimit/Makefile.PL
index 1a8d713dc2cab52aa28da681c8e70630d5d0c1ca..fe1e00d7c1548d8382add588ffcd01175f7469be 100644 (file)
--- a/lib/perl/Ulimit/Makefile.PL
+++ b/lib/perl/Ulimit/Makefile.PL
@@ -1,11 +1,10 @@
+# Makefile for Perl MakeMaker  (c) 2003 Tomas Valla <tom@ucw.cz>
+
 use ExtUtils::MakeMaker;
-# See lib/ExtUtils/MakeMaker.pm for details of how to influence
-# the contents of the Makefile that is written.
 WriteMakefile(
     'NAME'             => 'Sherlock::Ulimit',
     'MAKEFILE'         => 'Makefile.tmp',
     'VERSION_FROM'     => 'Ulimit.pm',
     'INST_LIB'         => 'lib',
     'INST_ARCHLIB'     => 'arch',
-    #'PREFIX'  => '.',
 );

diff --git a/lib/perl/Ulimit/Ulimit.pm b/lib/perl/Ulimit/Ulimit.pm
index f368555589574c129fc11c834d14e9a3b8b1a328..ed66b3f9435ecf71a6ce0709d079e9ffa268a36b 100644 (file)
--- a/lib/perl/Ulimit/Ulimit.pm
+++ b/lib/perl/Ulimit/Ulimit.pm
@@ -1,3 +1,21 @@
+# Perl module for setting process limits
+#
+# (c) 2003 Tomas Valla <tom@ucw.cz>
+#
+# This software may be freely distributed and used according to the terms
+# of the GNU Lesser General Public License.
+#
+#
+#
+# Interface:
+#   Sherlock::Ulimit::setlimit( $resource, $softlimit, $hardlimit)
+#   Sherlock::Ulimit::getlimit( $resource, $softlimit, $hardlimit)
+# 
+# setlimit sets limit to values supplied in softlimit and hardlimit
+# getlimit reads limits into softlimit and hardlimit
+# $resource constants are defined below
+#
+
 package Sherlock::Ulimit;
 
 use 5.006;
@@ -10,10 +28,6 @@ require DynaLoader;
 our @ISA = qw(Exporter DynaLoader);
 unshift @DynaLoader::dl_library_path, "lib";
 
-# Items to export into callers namespace by default. Note: do not export
-# names by default without a very good reason. Use EXPORT_OK instead.
-# Do not simply export all your public functions/methods/constants.
-
 our $CPU = 0;
 our $FSIZE = 1;
 our $DATA = 2;

diff --git a/lib/perl/Ulimit/Ulimit.xs b/lib/perl/Ulimit/Ulimit.xs
index 94ac8573d0bac55fae13bafd576e350f33755cee..7aea4740c24ed7d3acf45d40ed9dee9a2e548dca 100644 (file)
--- a/lib/perl/Ulimit/Ulimit.xs
+++ b/lib/perl/Ulimit/Ulimit.xs
@@ -1,3 +1,10 @@
+/*
+ * PerlXS module for managing process limits
+ *
+ * (c) 2003 Tomas Valla <tom@ucw.cz>
+ *
+ */
+
 #include "EXTERN.h"
 #include "perl.h"
 #include "XSUB.h"