Синтаксическая ошибка Perl RegEx

следующий фрагмент кода, взятый из http://perldoc.perl.org/perlrequick.html#Search-and-replace , дает мне

Невидимое слово найдено там, где ожидался оператор в строке 2 blub.pl, рядом с "s / dogs / cats / r"

В чем проблема? Я использую Perl 5.12.4 в Windows XP.

Код:

$x = "I like dogs.";
$y = $x =~ s/dogs/cats/r;
print "$x $y\n";