1Crypt::OpenSSL::DSA::SiUgsneartuCroen(t3r)ibuted Perl DoCcruympetn:t:aOtpieonnSSL::DSA::Signature(3)
2
3
4
6 Crypt::OpenSSL::DSA::Signature - Digital Signature Object
7
9 use Crypt::OpenSSL::DSA;
10 my $dsa_priv = Crypt::OpenSSL::DSA->read_priv_key( $filename );
11 my $sig_obj = $dsa_priv->do_sign($message);
12 my $dsa_pub = Crypt::OpenSSL::DSA->read_pub_key( $filename );
13 my $valid = $dsa_pub->do_verify($message, $sig_obj);
14 my $sig_size = $dsa_priv->get_sig_size();
15
16 my $r = $sig_obj->get_r;
17 my $s = $sig_obj->get_s;
18
19 my $sig_obj2 = Crypt::OpenSSL::DSA::Signature->new();
20 $sig_obj2->set_r($r);
21 $sig_obj2->set_s($s);
22 my $valid = $dsa_pub->do_verify($message, $sig_obj2);
23
25 $sig_obj = Crypt::OpenSSL::DSA::Signature->new();
26 Create a new DSA Signature Object. You will need to call set_r and
27 set_s after you create this.
28
30 $r = $sig_obj->get_r;
31 Gets first member of signature pair.
32
33 $s = $sig_obj->get_s;
34 Gets second member of signature pair.
35
36 $r = $sig_obj->set_r;
37 Sets first member of signature pair.
38
39 $s = $sig_obj->set_s;
40 Sets second member of signature pair.
41
43 T.J. Mather, <tjmather@maxmind.com>
44
46 Crypt::OpenSSL::DSA
47
48
49
50perl v5.34.0 2022-01-21 Crypt::OpenSSL::DSA::Signature(3)