[Iska]

Здесь, как никогда, хорош будет PowerShell:

Код:

$sSourceFile = "C:\Песочница\022\0001.txt"
$sDestFile   = "C:\Песочница\022\0002.txt"

if(Test-Path -Path $sSourceFile) {
    Get-Content -Path $sSourceFile |`
        ForEach-Object -Process {
            ($_.Split(",") |`
                ForEach-Object -Process {
                    [System.Int32]$_.Trim()
                } | Sort-Object) -join ", "
        } | Set-Content -Path $sDestFile
} else {
    Write-Host -ForegroundColor Red "Can't find source file [$sSourceFile]"
}

[Belial4444]

Iska, спасибо Вам огромное все отлично работает!)) Хотелось бы еще узнать можно ли как то по простому организовать поиск одинаковых строк в файле текстовом и одинаковые выводить в другой файл, я искал и натолкнулся что в линуксе это делается так: sort file.1 | uniq -d > file.2
Есть ли что-нибудь подобное для винды?)

[Iska]

Есть ли что-нибудь подобное для винды?) »

Нет.

и одинаковые выводить в другой файл, »

Зачем Вам выводить одинаковые?

Обычно ищут напротив — уникальные:

Код:

$sSourceFile = "C:\Песочница\022\0003.txt"
$sDestFile   = "C:\Песочница\022\0004.txt"

if(Test-Path -Path $sSourceFile) {
    Get-Content -Path $sSourceFile | Select-Object -Unique | Set-Content -Path $sDestFile
} else {
    Write-Host -ForegroundColor Red "Can't find source file [$sSourceFile]"
}

[Belial4444]

Iska, мне наоборот нужно повторы выявить среди этих строк, а точнее одинаковые числа, для этого и упорядочил по порядку их, чтобы можно было найти повторяющиеся строки соответственно повторяющиеся числовые комбинации, если бы числа были написаны вразброс комбинации некоторые могли бы уйти из виду.

[Iska]

Belial4444, в каком виде Вам надо? Просто перечислить по одному разу повторяющиеся строки? Или сколько раз повторов — столько раз и выводить повторяющуюся строку?

Т.е., из:

Код:

1
2
3
2
2
3
4
5

Вам нужно получить:

Код:

2
3

или же:

Код:

2
3
2
2
3

?

[Belial4444]

Iska, мне просто столбиком вывести в файл повторяющуюся комбинацию, например

Код:

12345
101112131415
6789
12345
765432
765432

Код:

12345
765432

Ну только, чтобы так же были цифры через запятую с пробелом)

[Iska]

То бишь — однократно. Ну, вот как-то так:

Код:

$sSourceFile = "C:\Песочница\022\0005.txt"
$sDestFile   = "C:\Песочница\022\0006.txt"

if(Test-Path -Path $sSourceFile) {
    Compare-Object -ReferenceObject (Get-Content -Path $sSourceFile) -DifferenceObject (Get-Content -Path $sSourceFile | Select-Object -Unique) -PassThru | `
        Set-Content -Path $sDestFile
} else {
    Write-Host -ForegroundColor Red "Can't find source file [$sSourceFile]"
}

[Foreigner]

Как вариант. Перезаписывает исходный файл 1.txt ( с "uniq -d" )

Код:

$a = gc 1.txt | select -unique 

(compare (gc 1.txt) $a).inputobject | % {

    ((( $_ -replace '\s','' -split ',' ) | % { [int] $_ } ) | sort ) -join ', '
    
} | sc 1.txt

[Belial4444]

Iska, Foreigner, то что нужно все как надо работает) Спасибо Вам большое, помогли очень сильно) У меня больше вопросов пока нету)