[Foreigner]

Нужно проверить, сравнить list-in.txt и list-out.txt, но вроде все корректно

Код:

[uri[]] $urls = Get-Content list-in.txt
$urls | Group-Object { $_.Segments[-1] } | Foreach-Object { $_.Group[-1].OriginalString } | Set-Content list-out.txt

[Alexander_88]

Нужно проверить, сравнить list-in.txt и list-out.txt, но вроде все корректно »

Спасибо, проверил через онлайн сервис сравнения двух тхт, все нормально.. А можно сделать, чтобы определяло именно по номеру файла, игнорируя имя и расширение? (ссылку также заменять полностью на новую).
и вопросик. если мне нужно таким образом проверить 50 txt файлов, и заменить оригиналы, на то, что результировал скрипт, нужно так делать?

Код:

[uri[]] $urls = Get-Content list-in.txt
$urls | Group-Object { $_.Segments[-1] } | Foreach-Object { $_.Group[-1].OriginalString } | Set-Content list-in.txt

и перекопировать этот код 50 раз изменяя имена файлов? ничего не нарушится при этом?

[Foreigner]

А можно сделать, чтобы определяло именно по номеру файла, игнорируя имя и расширение? »

Как-то так, опять же проверьте

Код:

[uri[]] $urls = gc list-in.txt
$urls | group-object { $_.Segments[-1] -replace '(?<=\d4).+' } | % { $_.Group[-1].OriginalString } | sc list-out.txt

если мне нужно таким образом проверить 50 txt файлов, и заменить оригиналы, на то, что результировал скрипт, нужно так делать? »

Можно, нужно завернуть в цикл:

Код:

$files = dir *.txt                     # Ваши *.txt файлы
foreach ($file in $files)
{
    [uri[]] $urls = Get-Content $file
    $urls | Group-Object { $_.Segments[-1] -replace '(?<=\d4).+' } | Foreach-Object {
        $_.Group[-1].OriginalString
    } | Set-Content $file             # перезаписывается исходный !!
}

[Alexander_88]

Как-то так, опять же проверьте »

Спасибо, завтра обязательно проверю, сегодня уже нет возможности..

Можно, нужно завернуть в цикл: »

а если пути файлов разные, я могу их через запятую перечислить? Пока не могу протестировать, только завтра... просто заранее спросил на всякий случай

[Foreigner]

могу их через запятую перечислить? »

Да, можно.

[Alexander_88]

Foreigner, попробовал второй вариант, но как будто бы ничего не поменялось.. также зависит от имени и расширения а не только от номера.. т.е. заменяет, если полностью совпадает имя файла (номер имя и расширение)

[megaloman]

Код:

@Echo Off &Cls
>nul Chcp 1251
SetLocal EnableDelayedExpansion
	Call :MyDir "Z:\Box_In\*.txt" "Z:\Box_Out" 
	Call :MyDir "Z:\Soft_In\*.txt" "Z:\Soft_In" 
Pause
Exit /B

:MyDir
	FOR %%f In (%1) DO Call :Replace "%%f" %2
Exit /B

:Replace
	Echo %1 -^> %2
	For /F "usebackq tokens=3 delims=:" %%i In (`2^>nul Find /C ":" %1`) Do Set /A N=%%i
	If %N% EQU 0 (Exit /B 1)
	Set /A N+=10000
	>"%~2\%~nx1.tmp" (For /L %%i In (10001,1,%N%) Do (
		Set /A M=%%i
		Set "M=/.*!M:~1!.*\..*"
		Set "SS="
		For /F "usebackq delims=" %%s In (`2^>nul FindStr /R /E /C:"!M!" %1`) Do Set "SS=%%s"
		If Not "!SS!"=="" (Echo !SS!)
	))
	>nul Move /Y "%~2\%~nx1.tmp" "%~2\%~nx1"
Exit /B

Скрипт просматривает файлы по указанной маске в указанной папке и помещает результаты в другую папку.
Папки могут и совпадать
A если пути файлов разные для каждого пишем свой Call :MyDir

[Alexander_88]

megaloman, спасибо, попробовал, теперь расширение и имя игнорирует как и нужно, только дольше обрабатывает 1 файл для теста попробовал (800 ссылок), и почему то сбивает сортировку..
все выводится не по порядку по номерам.. к примеру первые 5 строк с номерами файлов:

0625
0002
0628
0004
0102

[Alexander_88]

Foreigner, попробовал второй вариант, но как будто бы ничего не поменялось.. »

заметил, что строк стало меньше почему то