use English if we use INPUT_RECORD_SEPARATOR

2 files changed, 2 insertions, 1 deletions

diff --git a/Echolot/Pinger/CPunk.pm b/Echolot/Pinger/CPunk.pm
index 09145d2..f07f1e3 100644
--- a/Echolot/Pinger/CPunk.pm
+++ b/Echolot/Pinger/CPunk.pm
@@ -96,7 +96,7 @@ sub encrypt_to($$$$) {
 	$pid = $GnuPG->encrypt(
 		command_args => $command_args,
 		handles      => $handles );
-	my ($stdout, $stderr, $status) = readwrite_gpg('', $stdin_fh, $stdout_fh, $stderr_fh, $status_fh);
+	($stdout, $stderr, $status) = readwrite_gpg('', $stdin_fh, $stdout_fh, $stderr_fh, $status_fh);
 	waitpid $pid, 0;
 
 	#($stderr eq '') or
diff --git a/Echolot/Tools.pm b/Echolot/Tools.pm
index 332f2e8..bc88219 100644
--- a/Echolot/Tools.pm
+++ b/Echolot/Tools.pm
@@ -21,6 +21,7 @@ use Digest::MD5 qw{};
 use IO::Handle;
 use GnuPG::Interface;
 use Echolot::Log;
+use English;
 
 sub hash($) {
 	my ($data) = @_;