$str = "the boy walked the dog";
$str =~ s/walked/fed/ =~ s/boy/girl/ =~ s/dog/Audrey II/; # error

##</code><code>##

$str =~ 1

##</code><code>##

if ($str =~ s/boy/girl/) {
	# do this
}