Addendum. Take a look at Math::Prime::Util. It has an example on how to construct and use a Sophie Germain prime iterator. (Oh, and the wiki link: Diffie–Hellman key exchange.)