diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/importenv.pl')
-rw-r--r-- | Master/tlpkg/tlperl/lib/importenv.pl | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/Master/tlpkg/tlperl/lib/importenv.pl b/Master/tlpkg/tlperl/lib/importenv.pl deleted file mode 100644 index 625edf636d5..00000000000 --- a/Master/tlpkg/tlperl/lib/importenv.pl +++ /dev/null @@ -1,21 +0,0 @@ -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; - -# This library is no longer being maintained, and is included for backward -# compatibility with Perl 4 programs which may require it. -# This legacy library is deprecated and will be removed in a future -# release of perl. - -;# This file, when interpreted, pulls the environment into normal variables. -;# Usage: -;# require 'importenv.pl'; -;# or -;# #include <importenv.pl> - -local($tmp,$key) = ''; - -foreach $key (keys(%ENV)) { - $tmp .= "\$$key = \$ENV{'$key'};" if $key =~ /^[A-Za-z]\w*$/; -} -eval $tmp; - -1; |