На что действует оператор подстановки Perl?

Хммм ... ($lotr=$hobbit) =~ s/Bilbo/Frodo/g - одна из многих магий Perl. Теперь несколько ответов.

Q1) $lotr присваивается значение, содержащееся в $hobbit. После присвоения можно забыть об исходной переменной. Относитесь к ($lotr = $hobbit) как к собственному утверждению, как если бы мы написали:

$lotr = $hobbit;
$lotr =~ s/Bilbo/Frodo/g;

вместо. Регулярное выражение работает на $lotr.

Q2) Синтаксис - это просто однострочная версия приведенного выше фрагмента. Думайте об этом как «скопируйте строку из $a, скопируйте ее в $b и измените $b с помощью регулярного выражения» вместо «взять строку из $a, изменить ее с помощью регулярного выражения, поместить результат в $b»

Q3) Я предполагаю, что вы имеете в виду пространство поиска шаблона по умолчанию под «переменной цикла по умолчанию»? В этом случае просто используйте $_ вместо $hobbit:

while (<>) {
  chomp;
  ($lotr = $_) =~ s/Bilbo/Frodo/g;
  print "\$lotr = [$lotr]\n";
  print "\$_    = [$_]\n";
}

Интересно, что волшебная переменная $_ не изменяется этой операцией. Вот как вы можете сделать вывод, что присвоение происходит до подстановки регулярного выражения и что подстановка никак не взаимодействует с пространством шаблонов по умолчанию.

А что касается опытных программистов Perl ... Я не знаю слишком много людей, которых бросает в глаза какая-то часть синтаксиса Perl, независимо от того, как долго они на нее пялились, кроме мистера Шварца, конечно;)

Разные языки делают разные вещи с оператором присваивания. В некоторых случаях это утверждение, а не выражение, поэтому его нельзя объединить в более крупное выражение. В некоторых случаях он возвращает присвоенное значение, но только как значение (часто называемое rvalue), а не как что-то, что само может быть изменено или присвоено (lvalue). Примером этого является C, где вы можно написать:

 a = b = c;  # assign value of c to b and a

но нет:

 ++(b = a);  # assign value of a to b, then increment b

А в некоторых случаях результатом присваивания является присвоенное значение lvalue. (В Perl это применимо только к скалярным присвоениям; назначения списков - более сложный зверь.) Таким образом, вы можете сделать ++ ($ b = $ a) или ($ b = $ a) = ~ s / a / b / или любая другая операция, которая ожидает lvalue для присвоения, и она сначала выполнит присвоение, а затем изменит присвоенное lvalue.

Если во втором квартале вы собираетесь взять подстроку из $ a, вам может пригодиться эта идиома:

($b) = $a =~ /(substring-to-match)/;
$b =~ s/regex-on-susbtring/result-string/;

Также обратите внимание, что $ a и $ b не являются обычными переменными в Perl, поскольку у них есть особые правила области видимости, связанные с функцией сортировки. Подробности смотрите в perldoc perlvar.