From b2afc0a9dcc9036acb4840944d339b53a4a8bcac Mon Sep 17 00:00:00 2001
From: Andy Polyakov <appro@openssl.org>
Date: Mon, 16 May 2011 18:11:45 +0000
Subject: [PATCH] cms-test.pl: make it work with not-so-latest perl. (cherry
 picked from commit 9c437e2faded18b4ef6499d7041c65d6e216955b)

---
 test/cms-test.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/test/cms-test.pl b/test/cms-test.pl
index 9c50dff3e9..6f8792f34b 100644
--- a/test/cms-test.pl
+++ b/test/cms-test.pl
@@ -411,8 +411,10 @@ sub run_smime_tests {
 }
 
 sub cmp_files {
+    use FileHandle;
     my ( $f1, $f2 ) = @_;
-    my ( $fp1, $fp2 );
+    my $fp1 = FileHandle->new();
+    my $fp2 = FileHandle->new();
 
     my ( $rd1, $rd2 );
 
-- 
2.25.1