]>
Commit | Line | Data |
---|---|---|
1 | package Digest::HighwayHash; | |
2 | ||
3 | use 5.014000; | |
4 | use strict; | |
5 | use warnings; | |
6 | use parent qw/Exporter/; | |
7 | ||
8 | our @EXPORT_OK = qw/highway_hash64 highway_hash128 highway_hash256/; | |
9 | our @EXPORT = @EXPORT_OK; | |
10 | ||
11 | our $VERSION = '0.000_001'; | |
12 | ||
13 | use Math::Int64; | |
14 | ||
15 | require XSLoader; | |
16 | XSLoader::load('Digest::HighwayHash', $VERSION); | |
17 | ||
18 | 1; | |
19 | __END__ | |
20 | ||
21 | =encoding utf-8 | |
22 | ||
23 | =head1 NAME | |
24 | ||
25 | Digest::HighwayHash - fast strong hash function | |
26 | ||
27 | =head1 SYNOPSIS | |
28 | ||
29 | use Digest::HighwayHash; | |
30 | say highway_hash64 [1, 2, 3, 4], 'hello'; | |
31 | # 11956820856122239241 | |
32 | say join ' ', @{highway_hash128([1, 2, 3, 4], 'hello')}; | |
33 | # 3048112761216189476 13900443277579286659 | |
34 | say join ' ', @{highway_hash256([1, 2, 3, 4], 'hello')}; | |
35 | # 8099666330974151427 17027479935588128037 4015249936799013189 10027181291351549853 | |
36 | ||
37 | =head1 DESCRIPTION | |
38 | ||
39 | HighwayHash is a fast and strong hash function, documented at | |
40 | L<https://github.com/google/highwayhash>. | |
41 | ||
42 | =head1 SEE ALSO | |
43 | ||
44 | L<https://github.com/google/highwayhash> | |
45 | ||
46 | =head1 AUTHOR | |
47 | ||
48 | Marius Gavrilescu, E<lt>marius@ieval.roE<gt> | |
49 | ||
50 | =head1 COPYRIGHT AND LICENSE | |
51 | ||
52 | Copyright (C) 2018 by Marius Gavrilescu | |
53 | ||
54 | This library is free software; you can redistribute it and/or modify | |
55 | it under the same terms as Perl itself, either Perl version 5.24.1 or, | |
56 | at your option, any later version of Perl 5 you may have available. | |
57 | ||
58 | ||
59 | =cut |