--- ReadBinary.pm.orig	2022-08-24 12:29:02.614987942 +0000
+++ /usr/local/share/perl/5.30.0/Mac/PropertyList/ReadBinary.pm	2022-08-24 08:06:04.044071018 +0000
@@ -201,7 +201,7 @@
 	1 => sub { # integers
 		my( $self, $power2 ) = @_;
 
-		croak "Integer with <$power2> bytes is not supported" if $power2 > 3;
+		croak "Integer with <$power2> bytes is not supported" if $power2 > 4;
 
 		my $byte_length = 1 << $power2;