diff --git a/bindings/perl/Sigar.xs b/bindings/perl/Sigar.xs
index 40fc9d40..cc891683 100644
--- a/bindings/perl/Sigar.xs
+++ b/bindings/perl/Sigar.xs
@@ -37,6 +37,7 @@ typedef sigar_proc_cred_name_t * Sigar__ProcCredName;
 typedef sigar_file_attrs_t * Sigar__FileAttrs;
 typedef sigar_cpu_t * Sigar__Cpu;
 typedef sigar_cpu_info_t * Sigar__CpuInfo;
+typedef sigar_cpu_perc_t * Sigar__CpuPerc;
 typedef sigar_net_interface_config_t * Sigar__NetInterfaceConfig;
 typedef sigar_swap_t * Sigar__Swap;
 typedef sigar_proc_state_t * Sigar__ProcState;
diff --git a/bindings/perl/typemap b/bindings/perl/typemap
index 9a459cdf..1a2beebd 100644
--- a/bindings/perl/typemap
+++ b/bindings/perl/typemap
@@ -14,6 +14,7 @@ Sigar::ProcCredName T_PTROBJ
 Sigar::FileAttrs T_PTROBJ
 Sigar::Cpu T_PTROBJ
 Sigar::CpuInfo T_PTROBJ
+Sigar::CpuPerc T_PTROBJ
 Sigar::NetInterfaceConfig T_PTROBJ
 Sigar::Swap T_PTROBJ
 Sigar::ProcState T_PTROBJ