Digest::file(3pm) Perl Programmers Reference Guide Digest::file(3pm)NAME
Digest::file - Calculate digests of files
SYNOPSIS
# Poor mans "md5sum" command
use Digest::file qw(digest_file_hex);
for (@ARGV) {
print digest_file_hex($_, "MD5"), " $_
";
}
DESCRIPTION
This module provide 3 convenience functions to calculate the digest of files. The following functions are provided:
digest_file( $file, $algorithm, [$arg,...] )
This function will calculate and return the binary digest of the bytes of the given file. The function will croak if it fails to open
or read the file.
The $algorithm is a string like "MD2", "MD5", "SHA-1", "SHA-512". Additional arguments are passed to the constructor for the
implementation of the given algorithm.
digest_file_hex( $file, $algorithm, [$arg,...] )
Same as digest_file(), but return the digest in hex form.
digest_file_base64( $file, $algorithm, [$arg,...] )
Same as digest_file(), but return the digest as a base64 encoded string.
SEE ALSO
Digest
perl v5.16.2 2012-08-26 Digest::file(3pm)
Check Out this Related Man Page
SHA1(3) User Contributed Perl Documentation SHA1(3)NAME
Digest::SHA1 - Perl interface to the SHA-1 Algorithm
SYNOPSIS
# Functional style
use Digest::SHA1 qw(sha1 sha1_hex sha1_base64);
$digest = sha1($data);
$digest = sha1_hex($data);
$digest = sha1_base64($data);
# OO style
use Digest::SHA1;
$ctx = Digest::SHA1->new;
$ctx->add($data);
$ctx->addfile(*FILE);
$digest = $ctx->digest;
$digest = $ctx->hexdigest;
$digest = $ctx->b64digest;
DESCRIPTION
The "Digest::SHA1" module allows you to use the NIST SHA-1 message digest algorithm from within Perl programs. The algorithm takes as
input a message of arbitrary length and produces as output a 160-bit "fingerprint" or "message digest" of the input.
The "Digest::SHA1" module provide a procedural interface for simple use, as well as an object oriented interface that can handle messages
of arbitrary length and which can read files directly.
A binary digest will be 20 bytes long. A hex digest will be 40 characters long. A base64 digest will be 27 characters long.
FUNCTIONS
The following functions can be exported from the "Digest::SHA1" module. No functions are exported by default.
sha1($data,...)
This function will concatenate all arguments, calculate the SHA-1 digest of this "message", and return it in binary form.
sha1_hex($data,...)
Same as sha1(), but will return the digest in hexadecimal form.
sha1_base64($data,...)
Same as sha1(), but will return the digest as a base64 encoded string.
METHODS
The "Digest::SHA1" module provide the standard "Digest" OO-interface. The constructor looks like this:
$sha1 = Digest->new('SHA-1')
$sha1 = Digest::SHA1->new
The constructor returns a new "Digest::SHA1" object which encapsulate the state of the SHA-1 message-digest algorithm. You can add
data to the object and finally ask for the digest using the methods described in Digest.
SEE ALSO
Digest, Digest::HMAC_SHA1, Digest::MD5
http://www.itl.nist.gov/fipspubs/fip180-1.htm
COPYRIGHT
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Copyright 1999-2001 Gisle Aas.
Copyright 1997 Uwe Hollerbach.
AUTHORS
Peter C. Gutmann, Uwe Hollerbach <uh@alumni.caltech.edu>, Gisle Aas <gisle@aas.no>
perl v5.8.0 2001-12-30 SHA1(3)
Manufacturer Links
General Information
Home Page: IBM United States
Documentation/Information: IBM System p - UNIX servers: Support and services
pSeries and AIX Information Center
Developerworks AIX Wiki: AIX Wiki
AIX for System Administrators
In-depth information from IBM:
IBM... (0 Replies)
Not sure if anyone is interested but I am just getting into UNIX like shell scripting...
I have great interest in pseudo-animations in text mode and accessing HW like /dev/dsp for example...
...
Have fun, I do... ;o)
# !/bin/sh
#
# Bargraph_Generator.sh
#
# A DEMO 6 bit coloured... (0 Replies)
For a starter I know the braces are NOT in the code...
Consider these code snippets:-
#!/bin/bash --posix
x=0
somefunction()
if
then
echo "I am here."
fi
# somefunction
#!/bin/bash --posix
x=0
somefunction()
if (2 Replies)
For those interested in installing dash shell on OSX Lion to help test POSIX compliancy of shell scripts, it is quite easy. I did it like this:
If you don't have gcc on your system:
0. Download and install the Command Line Tools for Xcode package from Sign In - Apple *
1. Download the dash... (2 Replies)
Hearing Aid...
Hi folks yet another bizarre piece of code that is Apple OSX 10.12.x to at least 10.14.1 specific.
It requires only a default OSX install, and the internal microphone along with an external headphone assembly.
Pre-amble, 14-02-2019:
For over 3 weeks now I have been suffering a... (3 Replies)
What is the point of this? Whenever I close my shell it appends to the history file without adding this. I have never seen it overwrite my history file.
# When the shell exits, append to the history file instead of overwriting it
shopt -s histappend (3 Replies)
Greetings,
I'm trying to delete a file with a weird name from within Terminal on a Mac.
It's a very old file (1992) with null characters in the name: ââWord FinderÂŽ Plusâ˘.
Here are some examples of what I've tried:
12FX009:5 dpontius$ ls
ââWord FinderÂŽ Plusâ˘
12FX009:5 dpontius$ rm... (29 Replies)
I have to print the number of stars that increases on each line from the minimum number until it reaches the maximum number, and then decreases until it goes back to the minimum number. After printing out the lines of stars, it should also print the total number of stars printed.
I have tried... (13 Replies)
Hi all...
Well guys and gals, I jumped in at the deep end and found things that PERL cannot do by default.
Many tricky terminal escape codes are not catered for so I had to create workarounds.
One thing I searched for was this:
Passing perl variable to shell command
AND, @Neo this was... (15 Replies)
Well, guys I saw a question about GOTO for Python.
So this gave me the inspiration to attempt a GOTO function for 'dash', (bash and ksh too).
Machine: MBP OSX 10.14.3, default bash terminal, calling '#!/usr/local/bin/dash'...
This is purely a fun project to see if it is possible in PURE... (3 Replies)
I am sharing a code snippet.
for (( i=0; i<=$(( $count -1 )); i++ ))
do
first=${barr2}
search=${barr1}
echo $first
echo "loop begins"
for (( j=0; j<=5000; j++ ))
do
if } == $search ]]; then
echo $j
break;
fi
done
second=${harr2}
echo $second (2 Replies)
Hi All,
I'm having a python script: test.py in /path/to/script/test.py
I'm using a properties file: test_properties.py (it is having values as dictionary{}) which is in same DIR as the script.
Sample Properties file:
params = {
'target_db' : 'a1_db'
'src_db' : ... (15 Replies)