Crypt::OpenSSL::DSA::Signature(3pm) | User Contributed Perl Documentation | Crypt::OpenSSL::DSA::Signature(3pm) |
Crypt::OpenSSL::DSA::Signature - Digital Signature Object
use Crypt::OpenSSL::DSA; my $dsa_priv = Crypt::OpenSSL::DSA->read_priv_key( $filename ); my $sig_obj = $dsa_priv->do_sign($message); my $dsa_pub = Crypt::OpenSSL::DSA->read_pub_key( $filename ); my $valid = $dsa_pub->do_verify($message, $sig_obj); my $sig_size = $dsa_priv->get_sig_size(); my $r = $sig_obj->get_r; my $s = $sig_obj->get_s; my $sig_obj2 = Crypt::OpenSSL::DSA::Signature->new(); $sig_obj2->set_r($r); $sig_obj2->set_s($s); my $valid = $dsa_pub->do_verify($message, $sig_obj2);
T.J. Mather, <tjmather@maxmind.com>
Crypt::OpenSSL::DSA
2024-04-01 | perl v5.38.2 |