$ line = 'Боб никогда не говорил, что все задумчивости были хорошими';
Взгляд: Подберите и поймайте ТОЛЬКО слово «когда-либо». Делайте это, используя утверждения типа «взгляд вперед» и / или «взгляд назад».
if ( $line =~ /(?<=\s)ever(?=\s)/) {
print "matched ";
}
замена: удалите слово «когда-либо» и пробел после него, используя любой механизм, какой захотите.
$line =~ s/ever\s+//;
print $line ;
Extra-Credit: Получить смещение символа в строку слова 'ever', используя любой механизм, который вы захотите.
my $result = index($line,'ever');
print $result;
Я написал экзамен. но я не прошёл. Что не так в этих ответах?