my( $signer , $sigobj ) = $pgp->verify( Signature => $sig );
    use DDS; die Dump( [ $key_id , $sigobj->key_id, unpack('H*', $sigobj->key_id ) , pack('H*',$key_id) ] );