Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re: Stumped by Crypt::OpenPGP::Signature->key_id

by Anonymous Monk
on Nov 22, 2011 at 11:18 UTC ( #939428=note: print w/replies, xml ) Need Help??

in reply to Stumped by Crypt::OpenPGP::Signature->key_id

Last time we danced the key-file formats had some issues ( see Crypt OpenPGP Brain twister )


13: # secret key $key_id, protected with the passphrase $pass. 15: my $key_id = '...'; 19: KeyID => $key_id, 32: # Using the public key associated with $key_id, encrypt the + contents 36: Recipients => $key_id, 93: Recipients => $key_id, 278: substr($cert->key_id_hex, -8, 8); 399: push @return, $cert unless $BAD_KEYS{ $cert->k +ey_id_hex }; 576: $cert->key_id_hex;

Try ->key_id_hex

Replies are listed 'Best First'.
Re^2: Stumped by Crypt::OpenPGP::Signature->key_id
by mhi (Friar) on Nov 22, 2011 at 11:49 UTC
    Sorry, but I don't see how that helps.
    • The node mentioned has nothing to do with the issue at hand.
    • The Searchlink doesn't work.
    • There is no
      Crypt::OpenPGP::Signature->key_id_hex but only
      Crypt::OpenPGP::Signature->key_id and

      The node mentioned has nothing to do with the issue at hand.

      Yup, just nostalgia

      The Searchlink doesn't work.

      Sorry if you have to copy/paste, at least I made it tab-key navigable (couldn't have posted the link otherwise )

      There is no Crypt::OpenPGP::Signature->key_id_hex

      Too bad, it was worth a shot

      Anyway, hex of anything is

      $ perl -le " print unpack qw/H*/, $_ for @ARGV; " 1 aSdF82 31 615364463832
         unpack('H*', $sigobj->key_id) gives me a 16-digit hex number in which I can find no similarity with the Key-ID of the actual key.
      Patches Welcome™ . . .
        Well, actually I did submit a patch for this to the module's author last night. Hope to get a reply some time soon.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://939428]
choroba went there year ago
[Discipulus]: here spring has sprung, so the warm is available without holidays..
[Discipulus]: Oh I got a (small but better than nothing) salary increase!! beer for all!
[cavac]: Not sure if it's only my connection, but seems rather slow to respond today.
[cavac]: Could some of you just log in for a second and check, for example, the tail daemon logfile?

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (8)
As of 2017-02-22 08:55 GMT
Find Nodes?
    Voting Booth?
    Before electricity was invented, what was the Electric Eel called?

    Results (325 votes). Check out past polls.