В Perl есть ли разница между / ^ / и / ^ / m?

Question

Документация для опции /m в perlre гласит:

Рассматривать строку как несколько строк. Тот изменить «^» и «$» из соответствующего начало или конец строки сопоставление начала или конца любой строки в любом месте строки.

Но этот пример, похоже, указывает на то, что /^/ и /^/m ведут себя одинаково. Что я недопонимаю?

use strict;
no warnings; # Ignore warning about implicit split to @_
my $x = " \n \n ";
print scalar(split /^/m, $x), scalar(split /$/m, $x), "\n";  # 33
print scalar(split /^/,  $x), scalar(split /$/,  $x), "\n";  # 31

Answer 1

Да, /^/ отличается от /^/m, но поскольку /^/ будет бесполезным при использовании с split, оно ( только для split * ) автоматически становится /^/m. Это задокументировано в perldoc -f split .

Это удивительный тип DWIM, который, вероятно, не был бы включен в perl, если бы нам пришлось делать это снова и снова.