X-Git-Url: http://git.refcnt.org/?p=distdns.git;a=blobdiff_plain;f=client.pl;h=cbf9b58bc3d62caa185f20a46f0f6410902cf1df;hp=729663f51a3c9a0b37148fddb617b9aa26960326;hb=2eeaf2830b8ec5df9a50488d58993275f9ef1387;hpb=eb97e893a835f728f4bff344d937d0b1813f711e

diff --git a/client.pl b/client.pl
index 729663f..cbf9b58 100755
--- a/client.pl
+++ b/client.pl
@@ -94,8 +94,7 @@ my $save_session = sub
 my $get_session = sub
 {
     open(my $fh, '<', $session_file) or _die "Cannot open $session_file for reading: $!\nPerhaps try running --init\n";
-    my $session = do { local $/; <$fh> };
-    chomp $session;
+    chomp(my $session = <$fh>);
     close($fh);
 
     return $session;