### Functional interface: use Crypt::Digest::CHAES qw( chaes chaes_hex chaes_b64 chaes_b64u chaes_file chaes_file_hex chaes_file_b64 chaes_file_b64u ); # calculate digest from string/buffer $chaes_raw = chaes('data string'); $chaes_hex = chaes_hex('data string'); $chaes_b64 = chaes_b64('data string'); $chaes_b64u = chaes_b64u('data string'); # calculate digest from file $chaes_raw = chaes_file('filename.dat'); $chaes_hex = chaes_file_hex('filename.dat'); $chaes_b64 = chaes_file_b64('filename.dat'); $chaes_b64u = chaes_file_b64u('filename.dat'); # calculate digest from filehandle $chaes_raw = chaes_file(*FILEHANDLE); $chaes_hex = chaes_file_hex(*FILEHANDLE); $chaes_b64 = chaes_file_b64(*FILEHANDLE); $chaes_b64u = chaes_file_b64u(*FILEHANDLE); ### OO interface: use Crypt::Digest::CHAES; $d = Crypt::Digest::CHAES->new; $d->add('any data'); $d->addfile('filename.dat'); $d->addfile(*FILEHANDLE); $result_raw = $d->digest; # raw bytes $result_hex = $d->hexdigest; # hexadecimal form $result_b64 = $d->b64digest; # Base64 form $result_b64u = $d->b64udigest; # Base64 URL Safe form
You can export selected functions:
use Crypt::Digest::CHAES qw(chaes chaes_hex chaes_b64 chaes_b64u chaes_file chaes_file_hex chaes_file_b64 chaes_file_b64u);
Or all of them at once:
use Crypt::Digest::CHAES ':all';
$chaes_raw = chaes('data string'); #or $chaes_raw = chaes('any data', 'more data', 'even more data');
$chaes_hex = chaes_hex('data string'); #or $chaes_hex = chaes_hex('any data', 'more data', 'even more data');
$chaes_b64 = chaes_b64('data string'); #or $chaes_b64 = chaes_b64('any data', 'more data', 'even more data');
$chaes_b64url = chaes_b64u('data string'); #or $chaes_b64url = chaes_b64u('any data', 'more data', 'even more data');
$chaes_raw = chaes_file('filename.dat'); #or $chaes_raw = chaes_file(*FILEHANDLE);
$chaes_hex = chaes_file_hex('filename.dat'); #or $chaes_hex = chaes_file_hex(*FILEHANDLE);
BEWARE: You have to make sure that the filehandle is in binary mode before you pass it as argument to the addfile() method.
$chaes_b64 = chaes_file_b64('filename.dat'); #or $chaes_b64 = chaes_file_b64(*FILEHANDLE);
$chaes_b64url = chaes_file_b64u('filename.dat'); #or $chaes_b64url = chaes_file_b64u(*FILEHANDLE);
$d = Crypt::Digest::CHAES->new();
$d->clone();
$d->reset();
$d->add('any data'); #or $d->add('any data', 'more data', 'even more data');
$d->addfile('filename.dat'); #or $d->addfile(*FILEHANDLE);
$d->add_bits($bit_string); # e.g. $d->add_bits("111100001010"); #or $d->add_bits($data, $nbits); # e.g. $d->add_bits("\xF0\xA0", 16);
$d->hashsize; #or Crypt::Digest::CHAES->hashsize(); #or Crypt::Digest::CHAES::hashsize();
$result_raw = $d->digest();
$result_hex = $d->hexdigest();
$result_b64 = $d->b64digest();
$result_b64url = $d->b64udigest();