diff --git a/contrib/jsonb_plperl/expected/jsonb_plperlu.out b/contrib/jsonb_plperl/expected/jsonb_plperlu.out
index 3f5c5c681d..fe8ca19a71 100644
--- a/contrib/jsonb_plperl/expected/jsonb_plperlu.out
+++ b/contrib/jsonb_plperl/expected/jsonb_plperlu.out
@@ -78,10 +78,8 @@ INFO:  $VAR1 = '1';
  1
 (1 row)
 
-SELECT roundtrip('1E+131071');
-INFO:  $VAR1 = 'inf';
-ERROR:  cannot convert infinity to jsonb
-CONTEXT:  PL/Perl function "roundtrip"
+-- skip because Data::Dumper produces a platform-dependent spelling of infinity
+-- SELECT roundtrip('1E+131071');
 SELECT roundtrip('-1');
 INFO:  $VAR1 = '-1';
  roundtrip 
diff --git a/contrib/jsonb_plperl/sql/jsonb_plperlu.sql b/contrib/jsonb_plperl/sql/jsonb_plperlu.sql
index 49c71fbc44..907dd4f73c 100644
--- a/contrib/jsonb_plperl/sql/jsonb_plperlu.sql
+++ b/contrib/jsonb_plperl/sql/jsonb_plperlu.sql
@@ -61,7 +61,8 @@ $$;
 
 SELECT roundtrip('null') is null;
 SELECT roundtrip('1');
-SELECT roundtrip('1E+131071');
+-- skip because Data::Dumper produces a platform-dependent spelling of infinity
+-- SELECT roundtrip('1E+131071');
 SELECT roundtrip('-1');
 SELECT roundtrip('1.2');
 SELECT roundtrip('-1.2');