diff --git a/bindings/perl/Sigar.xs b/bindings/perl/Sigar.xs
index 2c06b02b..40fc9d40 100644
--- a/bindings/perl/Sigar.xs
+++ b/bindings/perl/Sigar.xs
@@ -47,6 +47,7 @@ typedef sigar_proc_cpu_t * Sigar__ProcCpu;
 typedef sigar_proc_mem_t * Sigar__ProcMem;
 typedef sigar_file_system_t * Sigar__FileSystem;
 typedef sigar_file_system_usage_t * Sigar__FileSystemUsage;
+typedef sigar_disk_usage_t * Sigar__DiskUsage;
 typedef sigar_proc_stat_t * Sigar__ProcStat;
 typedef sigar_net_route_t * Sigar__NetRoute;
 typedef sigar_net_interface_stat_t * Sigar__NetInterfaceStat;
diff --git a/bindings/perl/typemap b/bindings/perl/typemap
index e5223550..9a459cdf 100644
--- a/bindings/perl/typemap
+++ b/bindings/perl/typemap
@@ -24,6 +24,7 @@ Sigar::ProcCpu T_PTROBJ
 Sigar::ProcMem T_PTROBJ
 Sigar::FileSystem T_PTROBJ
 Sigar::FileSystemUsage T_PTROBJ
+Sigar::DiskUsage T_PTROBJ
 Sigar::ProcStat T_PTROBJ
 Sigar::NetRoute T_PTROBJ
 Sigar::NetInterfaceStat T_PTROBJ