my $target = 'this is a test of the servise'; $target =~ s//are/; print "$target\n"; #### if ($target =~ /test/) { $target =~ s//quiz/; } #### my $target = 'this is a test of the servise'; if ($target =~ /test/) { $target =~ s//test2/; } if ($target =~ /nothing/) { $target = s//null/; } else { $target =~ s//foo/; }