Try to use relative path

mklinks

@@ -74,6 +74,7 @@ sub mklinks {
         if (-e $target) {
             warn "target exists: $target\n";
         } else {
+#           $source = File::Spec->abs2rel($source, $target);
             `ln -s $source $target`;
         }
     }