Help for this page

Select Code to Download

Select or download this

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

Select or download this

Bareword found where operator expected at r.pl line 2, near "s/dogs/ca
+ts/r"
syntax error at r.pl line 2, near "s/dogs/cats/r"