diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Env.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/Env.pm | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/Master/tlpkg/tlperl/lib/Env.pm b/Master/tlpkg/tlperl/lib/Env.pm index 6e6cd8b2305..eaf30f15a39 100644 --- a/Master/tlpkg/tlperl/lib/Env.pm +++ b/Master/tlpkg/tlperl/lib/Env.pm @@ -1,6 +1,6 @@ package Env; -our $VERSION = '1.04'; +our $VERSION = '1.05'; =head1 NAME @@ -35,7 +35,7 @@ You may access its value or modify it - $PATH .= ":."; + $PATH .= ":/any/path"; push @LD_LIBRARY_PATH, $dir; however you'd like. Bear in mind, however, that each access to a tied array @@ -44,15 +44,16 @@ variable requires splitting the environment variable's string anew. The code: use Env qw(@PATH); - push @PATH, '.'; + push @PATH, '/any/path'; -is equivalent to: +is almost equivalent to: use Env qw(PATH); - $PATH .= ":."; + $PATH .= ":/any/path"; except that if C<$ENV{PATH}> started out empty, the second approach leaves -it with the (odd) value "C<:.>", but the first approach leaves it with "C<.>". +it with the (odd) value "C<:/any/path>", but the first approach leaves it with +"C</any/path>". To remove a tied environment variable from the environment, assign it the undefined value |