$_ =~ s/test/replace/g;