Sign in
apache
/
spamassassin
/
52354bb4347fda3d7829ee5885da77e1846f309e
/
.
/
build
/
sha512sum.pl
blob: e24b1714918045f5596d53d62ae72134e404102b [
file
] [
log
] [
blame
]
#!/usr/bin/perl
BEGIN
{
require
Digest
::
SHA
;
Digest
::
SHA
->
import
(
qw
(
sha256_hex sha512_hex
));
}
$
/=
undef
;
while
(<>)
{
print
sha512_hex
(
$_
),
" $ARGV\n"
;
}