diff --git a/perl/t/500-lib-load.t b/perl/t/500-lib-load.t
index 140716955..de928aed7 100644
--- a/perl/t/500-lib-load.t
+++ b/perl/t/500-lib-load.t
@@ -17,7 +17,18 @@
 
 use strict;
 use warnings;
-use Test::More tests => 1;
+
+BEGIN {
+    use Test::More;
+
+    eval "use Locale::TextDomain";;
+    if (exists $INC{"Locale/TextDomain.pm"}) {
+	plan tests => 1;
+    } else {
+	plan skip_all => "no perl-libintl module";
+	exit 0;
+    }
+}
 
 use Sys::Guestfs;
 use Sys::Guestfs::Lib;
diff --git a/perl/t/510-lib-file-arch.t b/perl/t/510-lib-file-arch.t
index 14392e89f..b0a96e9fe 100644
--- a/perl/t/510-lib-file-arch.t
+++ b/perl/t/510-lib-file-arch.t
@@ -17,7 +17,17 @@
 
 use strict;
 use warnings;
-use Test::More tests => 17;
+
+BEGIN {
+    use Test::More;
+    eval "use Locale::TextDomain";;
+    if (exists $INC{"Locale/TextDomain.pm"}) {
+	plan tests => 17;
+    } else {
+	plan skip_all => "no perl-libintl module";
+	exit 0;
+    }
+}
 
 use Sys::Guestfs;
 use Sys::Guestfs::Lib;