Если управляющая переменная не указана в начале цикла foreach, Perl по умолчанию использует служебную переменную $_. Она (в целом) ведет себя как любая другая скалярная переменная, несмотря на необычное имя. Пример:

foreach (1..10) { # По умолчанию используется $_
print "I can count to $_!\n";
}

Хотя это далеко не единственная переменная по умолчанию в Perl, она используется чаще других. Позднее вы увидите много других ситуаций, в которых автоматически применяется $_, если в программе не указана другая переменная или значение; так программист избавляется от необходимости придумывать и вводить новое имя переменной. А чтобы не томить вас в ожидании, подскажем один из этих случаев: функция print использует $_ при отсутствии других аргументов:

$_ = "Yabba dabba doo\n";
print; # По умолчанию выводит $_

Добавлено: 20 Июля 2018 07:19:25 Добавил: Андрей Ковальчук Нравится 0

Добавить