Sign in
apache
/
spamassassin
/
6e25754425125f87de0f4dfc5e1f464c9cf3fece
/
.
/
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"
;
}