diff --git a/programming/language/perl/perl-Unicode-Map8/files/Unicode-Map8-0.13-declaration.diff b/programming/language/perl/perl-Unicode-Map8/files/Unicode-Map8-0.13-declaration.diff
new file mode 100644
index 0000000000..5c0e9ec985
--- /dev/null
+++ b/programming/language/perl/perl-Unicode-Map8/files/Unicode-Map8-0.13-declaration.diff
@@ -0,0 +1,11 @@
+--- map8.h
++++ map8.h
+@@ -81,7 +81,7 @@
+ 
+ U16*  map8_to_str16(Map8*, U8*, U16*, int, int*);
+ U8*   map8_to_str8 (Map8*, U16*, U8*, int, int*);
+-U8*   map8_recode_8(Map8*, Map8*, U8*, U8*, int, int*);
++U8*   map8_recode8 (Map8*, Map8*, U8*, U8*, int, int*);
+ 
+ int   map8_empty_block(Map8*, U8);
+ 
diff --git a/programming/language/perl/perl-Unicode-Map8/files/Unicode-Map8-0.13-type.diff b/programming/language/perl/perl-Unicode-Map8/files/Unicode-Map8-0.13-type.diff
new file mode 100644
index 0000000000..3ed151253e
--- /dev/null
+++ b/programming/language/perl/perl-Unicode-Map8/files/Unicode-Map8-0.13-type.diff
@@ -0,0 +1,11 @@
+--- Map8.xs
++++ Map8.xs
+@@ -348,7 +348,7 @@
+ 	Map8* m2
+ 	PREINIT:
+ 	    STRLEN len;
+-	    STRLEN rlen;
++	    int rlen;
+ 	    char*  res;
+ 	INPUT:
+ 	    char* str = SvPV(ST(2), len);
diff --git a/programming/language/perl/perl-Unicode-Map8/pspec.xml b/programming/language/perl/perl-Unicode-Map8/pspec.xml
index 8df92aaf73..293654d711 100644
--- a/programming/language/perl/perl-Unicode-Map8/pspec.xml
+++ b/programming/language/perl/perl-Unicode-Map8/pspec.xml
@@ -21,6 +21,10 @@
 			<Dependency>perl</Dependency>
 			<Dependency>perl-Unicode-String</Dependency>
 		</BuildDependencies>
+		<Patches>
+            <Patch>Unicode-Map8-0.13-type.diff</Patch>
+			<Patch>Unicode-Map8-0.13-declaration.diff</Patch>
+        </Patches>
 	</Source>
 
 	<Package>