##
#!/bin/env perl
use warnings;
use strict;
use Digest::SHA1 "sha1_hex";
my $tmp = sha1_hex("hello");
print "SHA1 = " . $tmp . "\n";
####
$ perl -e 'print "$_\n" foreach @INC'
/usr/local/lib64/perl5
/usr/local/lib/perl5/site_perl/5.18.1/x86_64-linux
/usr/local/lib/perl5/site_perl/5.18.1
/usr/local/lib/perl5/5.18.1/x86_64-linux
/usr/local/lib/perl5/5.18.1
.