Input:
"Modeltest: testing the model of (dna)-substitution"

Output:
"Modeltest: testing the model of DNA-substitution"

Anyone knows how to do it by PERL? Thanks.

This is a MIME GnuPG-signed message.  If you see this text, it means that
your E-mail or Usenet software does not support MIME signed messages.
The Internet standard for MIME PGP messages, RFC 2015, was published in 1996.
To open this message correctly you will need to install E-mail or Usenet
software that supports modern Internet standards.

--=_mimegpg-commodore.email-scan.com-27516-1258459730-0003
Content-Type: text/plain; format=flowed; charset="US-ASCII"
Content-Disposition: inline
Content-Transfer-Encoding: 7bit

sofin writes:

> Input:
> "Modeltest: testing the model of (dna)-substitution"
> 
> Output:
> "Modeltest: testing the model of DNA-substitution"
> 
> Anyone knows how to do it by PERL? Thanks.

comp.lang.perl is down the hall, last door on your right.




--=_mimegpg-commodore.email-scan.com-27516-1258459730-0003
Content-Type: application/pgp-signature
Content-Transfer-Encoding: 7bit

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.9 (GNU/Linux)

iEYEABECAAYFAksCklIACgkQx9p3GYHlUOKj+QCfWejC1U8nT3DmluIK4Q/lg280
M1kAn2eUReaauUa8QaDRAoh02J0qVVG1
=0QH/
-----END PGP SIGNATURE-----

--=_mimegpg-commodore.email-scan.com-27516-1258459730-0003--

sofin wrote:
> Input:
> "Modeltest: testing the model of (dna)-substitution"
> 
> Output:
> "Modeltest: testing the model of DNA-substitution"
> 
> Anyone knows how to do it by PERL? Thanks.

And the reason you're asking in a C++ newsgroup instead of in a PERL 
group is...?