NAME
Protocol::OTR::Fingerprint - Off-the-Record contact's Fingerprint
VERSION
version 0.05
SYNOPSIS
my
$otr
= Protocol::OTR->new(
{
privkeys_file
=>
"otr.private_key"
,
contacts_file
=>
"otr.fingerprints"
,
instance_tags_file
=>
"otr.instance_tags"
,
}
);
# find or create account
my
$alice
=
$otr
->account(
'alice@domain'
,
'prpl-jabber'
);
# find or create contact known by $alice
my
$bob
=
$alice
->contact(
'bob@domain'
);
# return all $bob's fingerprints
for
my
$fingerprint
(
$bob
->fingerprints() ) {
"Fingerprint:\n"
;
" * hash: "
,
$fingerprint
->hash,
"\n"
;
" * status: "
,
$fingerprint
->status,
"\n"
;
" * is_verified: "
,
$fingerprint
->is_verified,
"\n"
;
}
DESCRIPTION
Protocol::OTR::Fingerprint represents the fingerprint for OTR contact.
METHODS
contact
my
$contact
=
$fingerprint
->contact();
Returns fingerprint's Protocol::OTR::Contact object.
hash
my
$hash
=
$fingerprint
->hash();
Returns fingerprint's hash in human readable format 12345678 90ABCDEF 12345678 90ABCDEF 12345678
.
status
my
$status
=
$fingerprint
->status;
Returns current status of fingerprint used in communication, which is one of:
Unused
Not private
Unverified
Private
Finished
is_verified
my
$is_verified
=
$fingerprint
->is_verified;
Returns true if current fingerprint is verified, false otherwise.
set_verified
$fingerprint
->set_verified(
$true_or_false
);
Sets fingerprint as verified or not.
SEE ALSO
AUTHOR
Alex J. G. Burzyński <ajgb@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2014 by Alex J. G. Burzyński <ajgb@cpan.org>.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.