Еще несколько минут назад я считал, что Perl 's $
соответствует любому типу конца строки. К сожалению, мое предположение оказывается неверным.
Следующий скрипт удаляет слово end только для $string3
.
use warnings;
use strict;
my $string1 = " match to the end". chr(13);
my $string2 = " match to the end". chr(13). chr(10);
my $string3 = " match to the end". chr(10);
$string1 =~ s/ end$//;
$string2 =~ s/ end$//;
$string3 =~ s/ end$//;
print "$string1\n";
print "$string2\n";
print "$string3\n";
Но я почти на 75% уверен, что видел случаи, когда $
совпадало как минимум с chr(13).chr(10)
.
Итак, чему именно (и при каких обстоятельствах )соответствует $
атом?