Use Digest::SHA instead of removed Digest::SHA1 #14
1 changed files with 1 additions and 1 deletions
|
@ -12,7 +12,7 @@ use File::CounterFile;
|
||||||
use Time::HiRes q(usleep);
|
use Time::HiRes q(usleep);
|
||||||
use IPC::Open3;
|
use IPC::Open3;
|
||||||
use File::Copy;
|
use File::Copy;
|
||||||
use Digest::SHA1 qw(sha1_hex);
|
use Digest::SHA qw(sha1_hex);
|
||||||
|
|
||||||
#Protocol version:
|
#Protocol version:
|
||||||
my $ver=1;
|
my $ver=1;
|
||||||
|
|
Loading…
Reference in a new issue