From aa4596a97efae86711d20d8587db3a6b0c0a59f6 Mon Sep 17 00:00:00 2001
From: Daniel Stenberg <daniel@haxx.se>
Date: Sat, 23 Aug 2025 16:37:07 +0200
Subject: [PATCH] mdlinkcheck: handle links with a leading slash properly

Ref: #18372
Closes #18382
---
 scripts/mdlinkcheck | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/scripts/mdlinkcheck b/scripts/mdlinkcheck
index f5b123a24a..925edc5294 100755
--- a/scripts/mdlinkcheck
+++ b/scripts/mdlinkcheck
@@ -99,8 +99,14 @@ sub storelink {
     my $dir = $f;
     $dir =~ s:([^/]*\z)::;
 
-    while($link =~ s:^\.\.\/::) {
-        $dir =~ s:([^/]*)\/\z::;
+    if($link =~ s/(^\/)//) {
+        # link starts with a slash, now removed
+        $dir = "";
+    }
+    else {
+        while($link =~ s:^\.\.\/::) {
+            $dir =~ s:([^/]*)\/\z::;
+        }
     }
 
     $flink{"./$dir$link"} .= "$f:$line ";