diff options
Diffstat (limited to 'client/scireclient.pl')
| -rwxr-xr-x | client/scireclient.pl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/client/scireclient.pl b/client/scireclient.pl index b93c79a..1da3dcd 100755 --- a/client/scireclient.pl +++ b/client/scireclient.pl @@ -182,10 +182,9 @@ sub register_client { sub identify_client { open(FILE, $conf{key_file}) or die("Couldn't open client_key $conf{key_file}: $!"); - my $digest = join("", <FILE>); + my $digest = <FILE>; + chomp $digest; close(FILE); - - #my $digest = "124567890"; my ($status, $message) = parse_response(send_command("IDENTIFY", $digest)); unless (defined $status && $status eq "OK") { print "Could not identify to server: $message\n"; |