1 #
   2 # Copyright (c) 1999, 2008, Oracle and/or its affiliates. All rights reserved.
   3 #
   4 
   5 #
   6 # Project.pm provides the bootstrap for the Sun::Solaris::Project module, and
   7 # also functions for reading, validating and writing out project(4) format
   8 # files.
   9 #
  10 ################################################################################
  11 require 5.8.4;
  12 
  13 use strict;
  14 use warnings;
  15 use locale;
  16 use Errno;
  17 use Fcntl;
  18 use File::Basename;
  19 use POSIX qw(locale_h limits_h);
  20 
  21 package Sun::Solaris::Project;
  22 
  23 our $VERSION = '1.9';
  24 
  25 use XSLoader;
  26 XSLoader::load(__PACKAGE__, $VERSION);
  27 
  28 our (@EXPORT_OK, %EXPORT_TAGS);
  29 my @constants = qw(MAXPROJID PROJNAME_MAX PROJF_PATH PROJECT_BUFSZ
  30     SETPROJ_ERR_TASK SETPROJ_ERR_POOL);
  31 my @syscalls = qw(getprojid);

   1 #
   2 # Copyright (c) 1999, 2008, Oracle and/or its affiliates. All rights reserved.
   3 #
   4 
   5 #
   6 # Project.pm provides the bootstrap for the Sun::Solaris::Project module, and
   7 # also functions for reading, validating and writing out project(4) format
   8 # files.
   9 #
  10 ################################################################################
  11 require 5.0010;
  12 
  13 use strict;
  14 use warnings;
  15 use locale;
  16 use Errno;
  17 use Fcntl;
  18 use File::Basename;
  19 use POSIX qw(locale_h limits_h);
  20 
  21 package Sun::Solaris::Project;
  22 
  23 our $VERSION = '1.9';
  24 
  25 use XSLoader;
  26 XSLoader::load(__PACKAGE__, $VERSION);
  27 
  28 our (@EXPORT_OK, %EXPORT_TAGS);
  29 my @constants = qw(MAXPROJID PROJNAME_MAX PROJF_PATH PROJECT_BUFSZ
  30     SETPROJ_ERR_TASK SETPROJ_ERR_POOL);
  31 my @syscalls = qw(getprojid);