diff --git a/completions/perl b/completions/perl
index 4b506fc0..843e249b 100644
--- a/completions/perl
+++ b/completions/perl
@@ -61,6 +61,15 @@ _perl()
             fi
             return 0
             ;;
+        -d|-dt)
+            if [[ $cur == :* ]]; then
+                temp="${cur#:}"
+                prefix="$prefix${cur%$temp}"
+                cur="Devel::$temp"
+                _perlmodules $1
+            fi
+            return 0
+            ;;
     esac
 
     if [[ "$cur" == -* ]]; then