Crypt::PK::DH documentation issue/question

[demonfoo]

After reading the documentation for the Crypt::PK::DH submodule, I like the concept, but... how does one access the computed key to encrypt/decrypt communication with the peer? I'd like to use this instead of Crypt::DH::GMP, but while I can mostly substitute it in, with Crypt::DH::GMP I can call compute_key_twoc() (or compute_key()) to get the computed key, but the docs don't indicate how this would be done, and I can't find any examples.

[karel-m]

Could you show be a piece of runnable perl sample code using Crypt::DH::GMP which you want to implement using Crypt::PK::DH?