Subversion Repositories DevTools

Rev

Rev 261 | Rev 5710 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 261 Rev 263
Line 16... Line 16...
16
 
16
 
17
require 5.006_001;
17
require 5.006_001;
18
 
18
 
19
use strict;
19
use strict;
20
use warnings;
20
use warnings;
-
 
21
 
-
 
22
package JatsEnv;
21
use JatsError;
23
use JatsError;
22
 
24
 
-
 
25
 
-
 
26
our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $VERSION);
-
 
27
use Exporter;
-
 
28
 
-
 
29
$VERSION = 1.00;
-
 
30
@ISA = qw(Exporter);
-
 
31
 
-
 
32
# Symbols to autoexport (:DEFAULT tag)
-
 
33
@EXPORT = qw(
-
 
34
                EnvImport
-
 
35
                EnvImportOptional
-
 
36
            );
-
 
37
 
23
#-------------------------------------------------------------------------------
38
#-------------------------------------------------------------------------------
24
# Function        : EnvImport
39
# Function        : EnvImport
25
#
40
#
26
# Description     : Import an environment variable into the global name space
41
# Description     : Import an environment variable into the global name space
27
#                   The user should have pre-declared the usage of the variable
42
#                   The user should have pre-declared the usage of the variable