Minor: [Perl][Test] Suppress warning in interop-data-test for Perl SDK (

#2511)
apache · Sep 21, 2023 · 53865e6 · 53865e6
1 parent f9f6cde
commit 53865e6
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/lang/perl/xt/interop.t b/lang/perl/xt/interop.t
@@ -21,8 +21,11 @@ use warnings;
 use Test::More;
 use File::Basename qw(basename);
 use IO::File;
-use_ok 'Avro::DataFile';
-use_ok 'Avro::DataFileReader';
+
+BEGIN {
+    use_ok 'Avro::DataFile';
+    use_ok 'Avro::DataFileReader';
+}
 
 for my $path (glob '../../build/interop/data/*.avro') {
     my $fn = basename($path);