for ($target =~ /is/g) {
    s//are/;
}