From cb189900499262c925ba2dbbe017e35b25c39d08 Mon Sep 17 00:00:00 2001
From: eleksir <eleksir@exs-elm.ru>
Date: Sun, 12 Apr 2020 02:44:45 +0300
Subject: [PATCH] buildinfo.pm: fix 2 syntax errors

---
 lib/buildinfo.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lib/buildinfo.pm b/lib/buildinfo.pm
index fbd33e7..15826da 100644
--- a/lib/buildinfo.pm
+++ b/lib/buildinfo.pm
@@ -42,13 +42,12 @@ sub buildinfo($) {
 		return ('500', $content, "Unable to read $c->{buildinfo}->{$config}: $!\n");
 	}
 
-	if ($len != $readlen)) {
+	if ($len != $readlen) {
 		warn "[FATA] Size of $c->{buildinfo}->{$config} $len bytes but actually read $readlen bytes";
 		return ('500', $content, "Unable to read $c->{buildinfo}->{$config}\n");
 	}
 
 	close JSON;
-	$/ = $sep;
 
 	my $j = eval { decode_json($json) } or do {
 		$status = '500';