diff --git a/lib/Perl/LanguageServer/DebuggerProcess.pm b/lib/Perl/LanguageServer/DebuggerProcess.pm
index 8ec8e73..20c7e00 100644
--- a/lib/Perl/LanguageServer/DebuggerProcess.pm
+++ b/lib/Perl/LanguageServer/DebuggerProcess.pm
@@ -271,8 +271,15 @@ sub signal
     return if (!$self -> pid) ;
 
     $self -> logger ("Send signal $signal to debuggee\n") ;
-
-    kill $signal, $self -> pid ;
+    if ($self->sudo_user)
+        {
+        my $cmd = "sudo -u ".$self->sudo_user." kill -s $signal `pgrep -P ".$self -> pid."`\n" ;
+        $self -> run_async ([$cmd]) ;
+        }
+    else
+        {
+        kill $signal, $self -> pid ;
+        }
     }
 
 # ---------------------------------------------------------------------------