Calculate Git sha1 for a file

Generate_GitSHA1_forAfile.sh

(echo -en "blob $(wc -c < $file)\00";cat $file)|sha1sum -b | cut -d " " -f 1

            or of course

git hash-object $file

gitSha1Calc.pl

use strict;
use warnings;
use Digest::SHA1;

my @input = <>;

my $content = join("", @input);

my $git_blob = 'blob' . ' ' . length($content) . "\0" . $content;

my $sha1 = Digest::SHA1->new();

$sha1->add($git_blob);

print $sha1->hexdigest();

For a file, this should be actually:

(echo -en "blob $(cat $file|wc -c)\00";cat $file)|sha1sum -b | cut -d " " -f 1

Oops. Forgot the redirect symbol and added an extra ")"

Many thanks @mick-d. Should be

(echo -en "blob $(wc -c < $file))\00";cat $file)|sha1sum -b | cut -d " " -f 1

Sorry about that. Now fixed