s/^$group:.*/$newstring/;

##</code><code>##

$_ = "$newstring\n" if /^$group:/;