Env

СОДЕРЖАНИЕ

• НАЗВАНИЕ
• СИНТАКСИС
• ОПИСАНИЕ
• ОГРАНИЧЕНИЯ
• АВТОР

НАЗВАНИЕ

Env - модуль Perl, который импортирует переменные окружения в качестве скаляров или массивов

СИНТАКСИС

use Env;
use Env qw(PATH HOME TERM);
use Env qw($SHELL @LD_LIBRARY_PATH);

ОПИСАНИЕ

Perl хранит переменные окружения в специальном хэше под названием %ENV. Для случаев, когда этот способ доступа неудобен, модуль Perl Env позволяет рассматривать переменные окружения как скалярные или массивно-типизированные переменные.

Функция Env::import() связывает переменные окружения с подходящими именами со скалярными переменными Perl с теми же именами. По умолчанию она связывает все существующие переменные окружения (keys %ENV) со скалярами. Если функция import получает аргументы, они интерпретируются как список переменных для связывания; это допустимо, если они ещё не существуют. Префикс скалярного типа '$' подразумевается для любого элемента этого списка, не имеющего префикса '$' или '@'. Массивы реализуются с помощью split и join, используя $Config::Config{path_sep} в качестве разделителя.

После связывания переменной окружения, просто используйте её как обычную переменную. Вы можете получить её значение

@path = split(/:/, $PATH);
print join("\n", @LD_LIBRARY_PATH), "\n";

или изменить его

$PATH .= ":.";
push @LD_LIBRARY_PATH, $dir;

как вам заблагорассудится. Однако имейте в виду, что каждый доступ к связанной массивно-типизированной переменной требует нового разделения строки переменной окружения.

Код:

use Env qw(@PATH);
push @PATH, '.';

эквивалентен:

use Env qw(PATH);
$PATH .= ":.";

за исключением того, что если $ENV{PATH} изначально была пустой, второй подход оставит её со значением (странным) ":.", а первый подход оставит её со значением ".".

Чтобы удалить связанную переменную окружения из среды, присвойте ей неопределённое значение

undef $PATH;
undef @LD_LIBRARY_PATH;

ОГРАНИЧЕНИЯ

В системах VMS массивы, связанные с переменными окружения, являются только для чтения. Попытка их изменения вызовет предупреждение.

АВТОР

Chip Salzenberg <chip@fin.uucp> и Gregor N. Purdy <gregor@focusresearch.com>