blob: ffe324d3e801c591753d871ffe726b9cf64077c6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
package Crypt::OpenPGP::Trust;
use strict;
use Crypt::OpenPGP::ErrorHandler;
use base qw( Crypt::OpenPGP::ErrorHandler );
sub new { bless { }, $_[0] }
sub flags { $_[0]->{flags} }
sub parse {
my $class = shift;
my($buf) = @_;
my $trust = $class->new;
$trust->{flags} = $buf->get_int8;
$trust;
}
1;
__END__
=head1 NAME
Crypt::OpenPGP::Trust - PGP Trust packet
=head1 DESCRIPTION
I<Crypt::OpenPGP::Trust> is a PGP Trust packet. From the OpenPGP
RFC: "Trust packets contain data that record the user's specifications
of which key holders are trustworthy introducers, along with other
information that implementing software uses for trust information."
=head1 AUTHOR & COPYRIGHTS
Please see the Crypt::OpenPGP manpage for author, copyright, and
license information.
=cut
|
