Выборка компов в сравнении

@dezhnevo · Регистрация: 20.11.2018

Студворк — интернет-сервис помощи студентам

Привет, мой находчивый помощник!
У меня к тебе (к вам) вопрос:
Есть много компов в AD. Все они называются по определенному шаблону. В имени присутствует буква и число, типа A1, A2, A3 ..... до бесконечности.
Используя конструкцию типа: Get-ADComputer -Filter {Name -like "A*"} | Select-Object -last 1 | Format-Table Name
мне выводится последний по счётчику. Так вот, мне нужно чтобы он мне вываливал все пропуски, т.е. если между A555 и A557 нет имени A556 (удален, отсутствует, не важно), чтобы показал. И так по всему массиву. Что-то голову поломал уже.
Спасибо, друг!

@Fors1k · 13.03.2020, 02:24

Сообщение от dezhnevo

нужно чтобы он мне вываливал все пропуски, т.е. если между A555 и A557 нет имени A556, чтобы показал

PowerShell
1
2
3
4
5
6
7
8
9
10
param(
    $filer="A", # Фильтр имени
    $num=1      # Номер первого ПК
)cls
 
((Get-ADComputer -Filter {Name -like "$filer*"}).name|sls "(?<=.)\d+").Matches.Value|%{
    while($num -ne $_){$res+=@($num++)}$num++
}
 
"ОТСУТСТВУЮТ ПК:";$res|%{$filer+$_}

@dezhnevo · 13.03.2020, 09:47 **[ТС]**

Привет! Что-то не Алёша твоё предложение, просто висит и ничего не происходит

Сделали так, все работает:

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
$Computers = Get-ADComputer -Filter "name -like 'A*'" | Select-Object Name | Sort-Object Name
foreach ($Computer in $Computers){
 
$Computer = $Computer.Name
[int]$CurrentNumber = ($computer | Select-String -Pattern '\d+$').matches.Value
 
if ($CurrentNumber.CompareTo($PreviousNumber+1).Equals( 1 ))
    {
      $MissingNumber = $PreviousNumber+1
      Write-host "$SearchComputers$MissingNumber"
    }
 
 [int]$PreviousNumber = $CurrentNumber
}

Спасибо, все равно!

@v_svitere · 13.03.2020, 11:00

dezhnevo,
Почему не Compare-Object

PowerShell
1
2
3
4
5
6
7
8
9
10
11
# Коллекция компьютеров (цифровой вариант)
$computer_numbers = (Get-ADComputer -filter {Name -like "A*"}).name |
Select-object -unique @{Name = 'Name'; Expression = {[double]([regex]'\d+').match($_).value}} |
Sort-object -Property Name
 
# Эталонный рейндж
$numbers_range = 1..(($computer_numbers | select-object -last 1).name)
 
# Сравним два объекта
$diff = Compare-Object -ReferenceObject $numbers_range -DifferenceObject $($computer_numbers.name)
$only_reference = ($diff | ? {$_.SideIndicator -eq "<="}).InputObject

@Fors1k · 13.03.2020, 11:43

Сообщение от dezhnevo

Что-то не Алёша твоё предложение

Запишем:a2, a4, a6, a9, a10, a14, b7
Пропущены:a1, a3, a5, a7, a8, a11, a12, a13

Тест кода Averson

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
param(
    $filer="A", # Фильтр имени
    $num=1      # Номер первого ПК
)cls
 
# таблица с данными
$text=@("a2","a4","a6","a9","a10","a14","b7")
 
$table = New-Object system.Data.DataTable “SampleTable”
$column1 = New-Object system.Data.DataColumn name,([string])
$table.columns.add($column1)
$text|%{$row = $table.NewRow();$row.name = $_;$table.Rows.Add($row)}
 
# Поиск
(($table|? name -like "a*").name|sls "\d+").Matches.Value|%{
    while($num -ne $_){$res+=@($num++)}$num++
}
 
"ОТСУТСТВУЮТ ПК:";$res|%{$filer+$_}

Ответ:

ОТСУТСТВУЮТ ПК:

A1

A3

A5

A7

A8

A11

A12

A13

Тест кода dezhnevo

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
# таблица с данными
$text=@("a2","a4","a6","a9","a10","a14","b7")
cls
$table = New-Object system.Data.DataTable “SampleTable”
$column1 = New-Object system.Data.DataColumn name,([string])
$table.columns.add($column1)
$text|%{$row = $table.NewRow();$row.name = $_;$table.Rows.Add($row)}
 
# Поиск
$Computers = $table|? name -like "a*" | Select-Object Name | Sort-Object Name
foreach ($Computer in $Computers){
 
    $Computer = $Computer.Name
    [int]$CurrentNumber = ($computer | Select-String -Pattern '\d+$').matches.Value
 
    if ($CurrentNumber.CompareTo($PreviousNumber+1).Equals( 1 )){
        $MissingNumber = $PreviousNumber+1
        Write-host "$SearchComputers$MissingNumber"
    }
 
 [int]$PreviousNumber = $CurrentNumber
}

Ответ:

Не найдены: 8,12,13

Тест кода v_svitere

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
# таблица с данными
$text=@("a2","a4","a6","a9","a10","a14","b7")
cls
$global:table = New-Object system.Data.DataTable “SampleTable”
$column1 = New-Object system.Data.DataColumn name,([string])
$table.columns.add($column1)
$text|%{$row = $table.NewRow();$row.name = $_;$table.Rows.Add($row)}
 
# Поиск
# Коллекция компьютеров (цифровой вариант)
$computer_numbers = ($table|? name -like "a*").name |
Select-object -unique @{Name = 'Name'; Expression = {[double]([regex]'\d+').match($_).value}} |
Sort-object -Property Name
 
# Эталонный рейндж
$numbers_range = 1..(($computer_numbers | select-object -last 1).name)
 
# Сравним два объекта
$diff = Compare-Object -ReferenceObject $numbers_range -DifferenceObject $($computer_numbers.name)
$only_reference = ($diff | ? {$_.SideIndicator -eq "<="}).InputObject
$diff.inputobject

Ответ:

YuS_2 · 13.03.2020, 12:32

Сообщение от Averson

Тест

Справедливости ради:
Там, конечно, у dezhnevo есть ошибки, но если сравнивать производительность методов:

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
[array]$a= 1..10000
[array]$b= 1..100+120..1000+1010..10000
 
(1..100|%{(measure-command{$b|
%{$i,$res=1,$null}{while($i -ne $_){$res+=@($i++)};$i++}}).totalmilliseconds}|
measure -ave).average
"Result1: {0}" -f (-join $res)
""
 
(1..100|%{(measure-command{$i,$res=1,$null;foreach ($num in $b){
    while($i -ne $num){$res+=@($i++)}
    $i++
}}).totalmilliseconds}|
measure -ave).average
"Result2: {0}" -f (-join $res)
""
 
(1..100|%{(measure-command{$res=$null;$res = (diff $a $b).InputObject}).totalmilliseconds}|
measure -ave).average
"Result3: {0}" -f (-join $res)

то получим результат, что цикл foreach, наиболее производительный, в отличии от Foreach-Object и Compare-Object

@dezhnevo · 13.03.2020, 12:58 **[ТС]**

Так, ща буду пробовать....

@Sallyy · 13.03.2020, 14:20

Сообщение от YuS_2

цикл foreach, наиболее производительный, в отличии от Foreach-Object и Compare-Object

Интересно как...
$b|%{} - это же по сути foreach($_ in $b){} , а разница в скорости и правда есть, аж в ~три раза с каждым методом

Загадка...
YuS_2, спасибо за информацию!

YuS_2 · 13.03.2020, 17:47

Сообщение от Sallyy

это же по сути

не так, это отличающиеся операции...
классический foreach дает преимущество за счет потребления памяти и кроме того, там есть зависимость от типа данных, от операций производимых с ними и от объема данных тоже есть зависимость. При некоторых условиях, Foreach-Object может работать быстрее стандартного цикла.
Кроме того, foreach-object работает сразу же с поступающими данными по конвейеру, а цикл foreach будет ожидать получение всей коллекции... собственно, поэтому последний и потребляет больше ресурсов.
Ну и ещё отличие цикла в том, что он "не умеет" передавать данные по конвейеру, а это заставляет использовать посредников в виде массивов, что в случае с объемными данными, естественно, приведет к большому расходу памяти...
как-то так...

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

@Fors1k · 13.03.2020, 23:52

Сообщение от YuS_2

цикл foreach, наиболее производительный

Сообщение от YuS_2

Кстати, можно ещё ускорить, если оптимизировать работу с массивами

Я правильно понял, как будет выглядеть топ вариант?

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
param(
    $filer="A", # Фильтр имени
    $num=1      # Номер первого ПК
)cls
 
# таблица с данными
$text=@("a2","a4","a6","a9","a10","a14","b7")
 
$table = New-Object system.Data.DataTable “SampleTable”;$column1 = New-Object system.Data.DataColumn name,([string]);$table.columns.add($column1);$text|%{$row = $table.NewRow();$row.name = $_;$table.Rows.Add($row)}
 
# Поиск
$res = New-Object System.Collections.ArrayList
$arr=(($table|? name -like "a*").name|sls "\d+").Matches.Value
foreach($pc in $arr){
    while($num -ne $pc){$res.add($num++)|out-null}$num++
}
 
"ОТСУТСТВУЮТ ПК:";$res|%{$filer+$_}

@dezhnevo · 14.03.2020, 11:27 **[ТС]**

Чёт не понял, как это он какие-то выбирает, а какие-то оставляет. В моем случае, проверил, ничего не пропускает. Странная логика работы

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
# таблица с данными
$text=@("a2","a4","a6","a9","a10","a14","b7")
cls
$table = New-Object system.Data.DataTable “SampleTable”
$column1 = New-Object system.Data.DataColumn name,([string])
$table.columns.add($column1)
$text|%{$row = $table.NewRow();$row.name = $_;$table.Rows.Add($row)}
 
# Поиск
$Computers = $table|? name -like "a*" | Select-Object Name | Sort-Object Name
foreach ($Computer in $Computers){
 
    $Computer = $Computer.Name
    [int]$CurrentNumber = ($computer | Select-String -Pattern '\d+$').matches.Value
 
    if ($CurrentNumber.CompareTo($PreviousNumber+1).Equals( 1 )){
        $MissingNumber = $PreviousNumber+1
        Write-host "$SearchComputers$MissingNumber"
    }
 
 [int]$PreviousNumber = $CurrentNumber
}
 
 
Ответ:
1
11
3
5
7
Не найдены: 8,12,13

Добавлено через 2 минуты

Добавлено через 1 минуту

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

Почему количество известно? Оно может меняться. Нет фиксированного числа

YuS_2 · 14.03.2020, 11:46

Сообщение от Averson

Я правильно понял, как будет выглядеть топ вариант?

Не знаю, тут надо собирать в кучу всё и тестировать при прочих равных.
Не претендуя на истину в последней инстанции, я бы сделал так:

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
param(
    $flt="A",   # Фильтр имени
    $num=1,     # Номер первого ПК
    $lim=10000  # Конечный номер числа компьютеров
)
 
# Тестовая коллекция имен компьютеров
$tmpnum = 1..10+20..50+60..80+90..$lim
$arr = new-object system.collections.generic.list[system.string]
for ($i=0;$i -lt $tmpnum.length;$i++){
    $null = $arr.add(($flt+$tmpnum[$i]))
}
 
<#
# Реальная коллекция
$arr = (Get-ADComputer -Filter "name -like 'A*'" ).name
#>
 
# Заполняем массив имеющимися в наличии именами
$res = new-object 'string[]' $lim
foreach ($item in $arr){
    $res[[int]($item -replace '\D') - 1] = $item
}
 
# Результат, отсутствующие имена по числовому порядку
for ($i=0;$i -lt $res.count;$i++){
    if (!$res[$i]){$flt + ($i+1)}
}

Добавлено через 5 минут

Сообщение от dezhnevo

Нет фиксированного числа

При получении списка машин, число их будет конечно, в любом случае.
Вот, последний по порядку номер из имени (там ведь числовая нумерация, правильно?), мы и можем принять за конечное число компьютеров. Нет?

@v_svitere · 14.03.2020, 12:27

Мне если, честно лень замерять, но есть еще LINQ-вариант)

PowerShell
1
2
3
4
5
6
7
8
9
10
# Коллекция компьютеров (цифровой вариант)
$computer_numbers = (Get-ADComputer -filter {Name -like "A*"}).name |
Select-object -unique @{Name = 'Name'; Expression = {[double]([regex]'\d+').match($_).value}} |
Sort-object -Property Name
 
# Эталонный рейндж
$numbers_range = 1..(($computer_numbers | select-object -last 1).name)
 
# Сравним два объекта
[system.linq.Enumerable]::Except([double[]]$numbers_range, [double[]]$($computer_numbers.name))

volodin661 · 14.03.2020, 13:05

я сильно не всматривался, но где граничное условие для правого конца последовательности ?

последнее значение из Get-ADComputer -Filter {Name -like "A*"} таковым явно
являться не может.

Добавлено через 4 минуты
это - первое.
а второе, зачем вообще это надо ? ( вопрос автору Темы)

@Fors1k · 14.03.2020, 16:53

Сообщение от v_svitere

Мне если, честно лень замерять, но есть еще LINQ-вариант)

Я не поленился замерить, и linq просто уничтожил остальные варианты)))

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
[long[]]$a.gettype()= 1..10000
[long[]]$b= 1..100+120..1000+1010..10000
cls
 
$table = New-Object system.Data.DataTable “measure”;$column1 = New-Object system.Data.DataColumn Method,([string]);
$column2 = New-Object system.Data.DataColumn 'Time(ms)',([float]);$table.columns.add($column1);$table.columns.add($column2)
 
$feo=(1..20|%{(measure-command{$b|
%{$i,$res=1,$null}{while($i -ne $_){$res+=@($i++)};$i++}}).totalmilliseconds}|
measure -ave).average
$row=$table.NewRow();$row.Method='ForEach-Object';$row.'time(ms)'=$feo;$table.Rows.Add($row)
"Result1: {0}" -f (-join $res)
""
$fe=(1..20|%{(measure-command{$i,$res=1,$null;foreach ($num in $b){
    while($i -ne $num){$res+=@($i++)}
    $i++
}}).totalmilliseconds}|
measure -ave).average
$row=$table.NewRow();$row.Method='ForEach';$row.'time(ms)'=$fe;$table.Rows.Add($row)
"Result2: {0}" -f (-join $res)
""
$diff=(1..20|%{(measure-command{$res=$null;$res = (diff $a $b).InputObject}).totalmilliseconds}|
measure -ave).average
$row=$table.NewRow();$row.Method='Compare-Object';$row.'time(ms)'=$diff;$table.Rows.Add($row)
"Result3: {0}" -f (-join $res)
""
$linq=(1..20|%{(measure-command{$res=$null;$res = [system.linq.Enumerable]::Except($a, $b)
}).totalmilliseconds}|
measure -ave).average
$row=$table.NewRow();$row.Method='Linq.Enumerable';$row.'time(ms)'=$linq;$table.Rows.Add($row)
"Result4: {0}" -f (-join $res)
""
$table|sort 'time(ms)'

Результат:

Method 

------

Linq.Enumerable

ForEach

ForEach-Object

Compare-Object

Time(ms)

--------

0,112935

40,33058

171,949

196,0043

Добавлено через 27 минут
По итогу всех наших исследований, для себя я вижу вот таким топ вариант решения:

PowerShell
1
2
3
4
5
6
7
8
9
param(
    $filter="A", # Фильтр имени
    $num=1      # Номер первого ПК
)cls
#-- Поиск
$PCnum=[long[]]((Get-ADComputer -filter {Name -like "$filter*"}).name|sls "\d+").Matches.Value
$ex=[system.linq.Enumerable]::Except([long[]]($num..$PCnum[-1]), $PCnum)
#-- Результат
"ОТСУТСТВУЮТ ПК:";$ex|%{$filer+$_}

И, кстати, получается с linq-способом не нужно беспокоиться о пересоздании массивов операцией +=

YuS_2 · 16.03.2020, 00:24

Сообщение от volodin661

таковым явно
являться не может.

Не может, если именно так... но может, если так:

Сообщение от v_svitere

@{Name = 'Name'; Expression = {[double]([regex]'\d+').match($_).value}}

а потом, так:

Сообщение от v_svitere

Sort-object -Property Name

Сообщение от Averson

linq просто уничтожил остальные варианты

что не удивительно.

@alhaos · 16.03.2020, 08:05

PowerShell
1
2
3
4
5
6
7
8
9
10
param(
    $filter="A", 
    $num=1
)
 
Clear-Host
 
$PCnum=[long[]](((Get-ADComputer -filter {Name -like "$filter*"}).Name.Substring($filter.Length - 1)))
$ex = [system.linq.Enumerable]::Except([long[]]($num..$PCnum[-1]), $PCnum)
"ОТСУТСТВУЮТ ПК:"; $ex.Foreach({"$($filter)$($_)"})

А если вот так измерить?

YuS_2 · 16.03.2020, 10:12

Сообщение от alhaos

А если вот так измерить?

Измерить что, вернее для чего? Относительно чего сравнение проводить?
Кроме того, такой момент:

Сообщение от alhaos

...
$filter="A",
...
... .Substring($filter.Length - 1)

- что дает эта подстрока?

@alhaos · 16.03.2020, 10:35

У меня пара вопросов, к тому действу к которому тут обычно сводится.

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

Если критерием качества скрипта ставить скорость обработки, и допустить, что имена компов будут только prefix(num) тогда substring думаю будет всегда выгоднее regex... и .foreach() будет быстрее чем конвейер...

К чему стремимся?

@v_svitere · 16.03.2020, 11:47

Не по теме:

alhaos

Если критерием качества скрипта ставить скорость обработки

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

Мои приоритеты примерно такие)
1. Алгоритм - понятный и продуманный, без лишних действий
2. Грамотное оформление
3. Быстродействие

На практике, примерно из 400 с лишним задач, оптимизацию по быстродействию пришлось проводить ну, наверное раз 5-6
Все остальные решения, отрабатывают предельно быстро, насколько это позволяет сама задача - за счет алгоритма и правильных инструментов.
Пытаться сэкономить миkлисекунды, когда у тебя командлет get-messagetrackinglog отрабатывает 10 минут - такое себе :)

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .

@dezhnevo 0 / 0 / 0 Регистрация: 20.11.2018 Сообщений: 24

	Выборка компов в сравнении 12.03.2020, 16:55. Показов 2764. Ответов 27 Метки нет (Все метки) Привет, мой находчивый помощник! У меня к тебе (к вам) вопрос: Есть много компов в AD. Все они называются по определенному шаблону. В имени присутствует буква и число, типа A1, A2, A3 ..... до бесконечности. Используя конструкцию типа: Get-ADComputer -Filter {Name -like "A*"} \| Select-Object -last 1 \| Format-Table Name мне выводится последний по счётчику. Так вот, мне нужно чтобы он мне вываливал все пропуски, т.е. если между A555 и A557 нет имени A556 (удален, отсутствует, не важно), чтобы показал. И так по всему массиву. Что-то голову поломал уже. Спасибо, друг! 0

@dezhnevo 0 / 0 / 0 Регистрация: 20.11.2018 Сообщений: 24
	13.03.2020, 12:58 [ТС]
	Так, ща буду пробовать.... 0

volodin661 6789 / 2286 / 348 Регистрация: 10.12.2013 Сообщений: 7,896
	14.03.2020, 13:05
	я сильно не всматривался, но где граничное условие для правого конца последовательности ? последнее значение из `Get-ADComputer -Filter {Name -like "A"}` таковым явно являться не может. Добавлено через 4 минуты* это - первое. а второе, зачем вообще это надо ? ( вопрос автору Темы) 0

@alhaos 1929 / 545 / 154 Регистрация: 20.02.2019 Сообщений: 2,664 Записей в блоге: 65
	16.03.2020, 10:35
	У меня пара вопросов, к тому действу к которому тут обычно сводится. Как сообщество мы можем определить критерии решения? В каких рамках судить о постановке задачи, исключительно в тех условиях, что привел автор? или расширяя их до гипотетических допущений... и насколько данные допущения имеют смысл. Если критерием качества скрипта ставить скорость обработки, и допустить, что имена компов будут только prefix(num) тогда substring думаю будет всегда выгоднее regex... и .foreach() будет быстрее чем конвейер... К чему стремимся? 0

Выборка компов в сравнении

Решение