$code =~ s/\+/P++; /g;