[已解决]PowerShell如何获取所有路径行中的公共部分？

5i365

有没有一种简单的方法可以获取一个多行字符串中, 所有路径的公共部分？
在下面的示例中，我希望输出为
C:\Users\Administrator\Desktop\Test0\DEF\

C:\Users\Administrator\Desktop\Test0\DEF\A
C:\Users\Administrator\Desktop\Test0\DEF\B
C:\Users\Administrator\Desktop\Test0\DEF\1.txt
C:\Users\Administrator\Desktop\Test0\DEF\2.txt

idwma

试试split-path

5i365

回复 2# idwma

多谢大侠指引, 下面的代码, 实际上有两个公共的路径, 分别如下: 但是如何只输出这两行呢?
C:\Users\Administrator\hello\
C:\Users\Administrator\Desktop\Test0\DEF\
这个逻辑有点难以描述

1. $s = @'
   
2. C:\Users\Administrator\hello\A
   
3. C:\Users\Administrator\hello\B
   
4. C:\Users\Administrator\hello\B\1.txt
   
5. C:\Users\Administrator\Desktop\Test0\DEF\A
   
6. C:\Users\Administrator\Desktop\Test0\DEF\B
   
7. C:\Users\Administrator\Desktop\Test0\DEF\1.txt
   
8. C:\Users\Administrator\Desktop\Test0\DEF\2.txt
   
9. '@
   
10. 
    
11. $s -split "\r?\n" |
    
12. foreach {
    
13.         Split-Path $_
    
14. }

复制代码

5i365

回复 2# idwma

下面这样写, 还是有个多余的项存在, 而且公共路径后应该有个\

1. $s = @'
   
2. C:\Users\Administrator\hello\A
   
3. C:\Users\Administrator\hello\B
   
4. C:\Users\Administrator\hello\B\1.txt
   
5. C:\Users\Administrator\Desktop\Test0\DEF\A
   
6. C:\Users\Administrator\Desktop\Test0\DEF\B
   
7. C:\Users\Administrator\Desktop\Test0\DEF\1.txt
   
8. C:\Users\Administrator\Desktop\Test0\DEF\2.txt
   
9. '@
   
10. 
    
11. $s -split "\r?\n" |
    
12. foreach {
    
13.         Split-Path $_
    
14. } | sort-object | Get-Unique

复制代码

idwma

1. $s=$s -split "\r?\n"
   
2. for($i=0;$i -lt $s.length;$i++){
   
3. if(!(gv a 2>$null)){$a=split-path $s[$i]}
   
4. if($s[$i+1] -notmatch [regex]::Escape($a)){$a+'\';rv a}
   
5. }

复制代码

5i365

回复 5# idwma


   多谢大侠帮忙, 结果是正确的, 但是水平有限, 代码实在看不懂

5i365

回复 5# idwma

下面的代码执行的结果是错误的
应该输出:
C:\Users\Administrator\hello
C:\Users\Administrator\Desktop\Test0\DEF\
感觉适应各种情况有点难


  

1. $s = @'
   
2. C:\Users\Administrator\hello
   
3. C:\Users\Administrator\hello\B
   
4. C:\Users\Administrator\hello\C\a.bat
   
5. C:\Users\Administrator\hello\B\1.txt
   
6. C:\Users\Administrator\Desktop\Test0\DEF\A
   
7. C:\Users\Administrator\Desktop\Test0\DEF\B
   
8. C:\Users\Administrator\Desktop\Test0\DEF\1.txt
   
9. C:\Users\Administrator\Desktop\Test0\DEF\2.txt
   
10. '@
    
11. $s = $s -split "\r?\n"
    
12. for ($i = 0; $i -lt $s.length; $i++)
    
13. {
    
14.         if (!(gv a 2>$null)) { $a = split-path $s[$i] }
    
15.         if ($s[$i + 1] -notmatch [regex]::Escape($a)) { $a + '\'; rv a }
    
16. }

复制代码

idwma

1. $s=$s -split "\r?\n"
   
2. for($i=0;$i -lt $s.length;$i++){
   
3.     if(!(gv a 2>$null)){
   
4.         for($j=0;$j -lt $s[$i+1].length;$j++){
   
5.             if(($s[$i][0..$j] -join '') -ne ($s[$i+1][0..$j] -join '')){$a=$s[$i][0..($j-1)] -join '';break}
   
6.         }
   
7.     }
   
8.     if($s[$i+1] -notmatch [regex]::Escape($a)){$a;rv a}
   
9. }

复制代码