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 IPC::Open3;
|
||||
use File::Copy;
|
||||
use Digest::SHA1 qw(sha1_hex);
|
||||
use Digest::SHA qw(sha1_hex);
|
||||
|
||||
#Protocol version:
|
||||
my $ver=1;
|
||||
|
|
Loading…
Reference in a new issue