На этом шаге мы рассмотрим третий случай "незаменимости" функции local().
На этом шаге рассмотрим третий случай.
В следующем примере внутри блока операторов временно изменяется значение одного элемента глобального хеш-массива %ENV, содержащего значение переменной $РАТН, входящей в состав среды интерпретатора UNIX shell.
#! perl -w
print   "значение переменной среды \$РАТН:\n$ENV{PATH}\n";
{
  local $ENV{PATH} = "/home/mike/bin";
  print "временное значение переменной среды \$РАТН: $ENV{PATH}\n"; 
} 
print "прежнее значение переменной среды \$РАТН:\n$ENV{PATH}\n";
Результат будет выведен в следующем виде (рисунок 1):

Рис.1. Результаты работы примера
На следующем шаге мы рассмотрим прототипы.