Grep как вывести количество совпадений в каждой строке.

[zse]

    — Приветствую всех!
    — Grep с ключём „-c“ выводит совпадение вообще.

Код: (bash) [Выделить]

grep -i -E -c "02|11|17|18|22|25|39|03" 2018Jun03221547.txt
27    — А хотелось бы чтобы в выводе команды типа:

Код: (bash) [Выделить]

grep -i -E  "02|11|17|18|22|25|39|03" 2018Jun03221547.txtнапротив каждой строки было указано количество совпадений…
    — А есть вдруг у кого  готовое решение как получить количество совпадений прострочно?

(Нажмите, чтобы показать/скрыть)

    — Если производится подсветка может есть возможность указать количество „подсвеченных“ позиций напротив каждой строки? Или вряд ли здесь можно обойтись только grep?

[ReNzRv]

Код: (bash) [Выделить]

perl -ne '$n=grep {/02|11|17|18|22|25|39|03/} split ("", $_); if ($n > 0) {chomp; print "$_ $n\n"}' 2018Jun03221547.txt

[zse]

    — Спасибо, ReNzRv, я perl применяю только в готовых скриптах т.е. методом банального плагиата😞…
    — Всё собираюсь хоть примитивное использование освоить…

[ReNzRv]

Да незачто)
Только я поспешил, и не нерабочий пример дал.
Вот рабочий:

Код: (bash) [Выделить]

perl -ne '$n=0; $s=$_; chomp $s; s/02|11|17|18|22|25|39|03/$n++/eg; print "$s $n\n" if ($n > 0)' 2018Jun03221547.txt

[zse]

   — Да, работает, благодарю!

(Нажмите, чтобы показать/скрыть)

Код: (bash) [Выделить]

↓↓↓                  /home/fjf/Desktop
perl -ne '$n=0; $s=$_; chomp $s; s/02|11|17|18|22|25|39|03/$n++/eg; print "$s $n\n" if ($n > 0)' Jun04_1654_49z.txt
02 04 06 21 23 35 43 1
02 11 17 18 22 25 39 03 8
02 14 21 22 24 30 32 2
03 07 14 15 20 28 43 1
03 10 25 38 46 48 49 2
04 08 11 13 36 42 44 1
06 13 18 23 32 38 45 1
10 14 24 25 30 31 41 1
12 14 17 23 29 41 47 1
12 27 28 29 33 39 43 1
15 17 20 23 30 31 35 1
26 32 33 39 40 45 47 1
01 02 04 10 25 31 33 2
01 07 08 13 15 20 22 1
01 09 33 35 39 43 45 1
01 11 13 33 34 38 42 1
01 15 17 22 31 34 46 2
02 04 12 18 40 41 43 2
02 05 11 30 31 43 47 2
02 11 24 35 38 43 49 2
02 19 32 36 42 43 46 1
03 12 16 37 38 44 46 1
03 20 24 25 27 37 43 2
04 06 11 34 37 41 46 1
04 19 25 30 31 32 40 1
05 07 08 22 24 33 40 1
05 17 22 32 37 45 46 2
↓↓↓                  /home/fjf/Desktop


     — Да, мощная однако штука perl при обработке текста!!!

[Azure]

Зачем усложнять?

Код: (bash) [Выделить]

while read line ; do
   n=0
   for i in $line ; do
       case $i in
           02|11|17|18|22|25|39|03) ((n++)) ;;
       esac
   done
   echo $n $line
done <2018Jun03221547.txtПользователь добавил сообщение 05 Июня 2018, 12:10:20:

Код: (bash) [Выделить]

awk '{print gsub("02|11|17|18|22|25|39|03","&"), $0}' 2018Jun03221547.txt

[zse]

Зачем усложнять?

     — По отношению ко мне данный вопрос звучит практически риторически ! А вот с уважаемым ReNzRv Вы бы даже очень могли поговорить!😇
     — Спасибо Azure, это пополнит мою коллекцию задач и их решения! После выхода на пенсию мотивация к познания Linux’а заметно снизилась, но тем не менее кое-что я всё же пытаюсь постичь.😈
2018 Jun 05; 06:02 AM
Пользователь добавил сообщение 05 Июня 2018, 13:38:29:     — В первом примере  может что-то с синтаксисом, не разбирался ещё…

(Нажмите, чтобы показать/скрыть)

Код: (bash) [Выделить]

    while read line ; do
>        n=0
>        for i in $line ; do
>            case $i in
>                02|11|17|18|22|25|39|03) ((n++)) ;;
>            esac
>        done
>        echo $n $line
>     done <<2018Jun03221547.txt
>


переводит на новую строку…
     — Второй пример хорошо работает.

(Нажмите, чтобы показать/скрыть)

Код: (bash) [Выделить]

awk '{print gsub("02|11|17|18|22|25|39|03","&"), $0}' 2018Jun03221547.txt
1 02 04 06 21 23 35 43
8 02 11 17 18 22 25 39 03
2 02 14 21 22 24 30 32
1 03 07 14 15 20 28 43
2 03 10 25 38 46 48 49
1 04 08 11 13 36 42 44
0 04 12 20 24 33 40 45
0 04 15 16 27 29 38 40
0 05 06 13 26 28 41 45
1 06 13 18 23 32 38 45
0 10 13 34 37 38 41 45
4 10 14 24 02 11 17 18
1 12 14 17 23 29 41 47
1 12 27 28 29 33 39 43
1 15 17 20 23 30 31 35
1 26 32 33 39 40 45 47
2 01 02 04 10 25 31 33
7 02 11 17 18 22 25 39
1 01 09 33 35 39 43 45
1 01 11 13 33 34 38 42
5 02 11 17 18 22 34 46
2 02 04 12 18 40 41 43
2 02 05 11 30 31 43 47
2 02 11 24 35 38 43 49
1 02 19 32 36 42 43 46
1 03 12 16 37 38 44 46
2 03 20 24 25 27 37 43
1 04 06 11 34 37 41 46
1 04 19 25 30 31 32 40
1 05 07 08 22 24 33 40
2 05 17 22 32 37 45 46
↓↓↓                  /home/fjf/Desktop


[Azure]

В первом примере  может что-то с синтаксисом

Лишний "<" (исправил)

[zse]

    — Да, спасибо, теперь работает!

(Нажмите, чтобы показать/скрыть)

Код: (bash) [Выделить]

↓↓↓                  /home/fjf/Desktop
while read line ; do
>    n=0
>    for i in $line ; do
>        case $i in
>            02|11|17|18|22|25|39|03) ((n++)) ;;
>        esac
>    done
>    echo $n $line
> done <Jun06_0710_32.txt
1 02 04 06 21 23 35 43
8 02 11 17 18 22 25 39 03
2 02 14 21 22 24 30 32
1 03 07 14 15 20 28 43
2 03 10 25 38 46 48 49
1 04 08 11 13 36 42 44
0 04 12 20 24 33 40 45
0 04 15 16 27 29 38 40
0 05 06 13 26 28 41 45
1 06 13 18 23 32 38 45
0 10 13 34 37 38 41 45
4 10 14 24 02 11 17 18
1 12 14 17 23 29 41 47
1 12 27 28 29 33 39 43
1 15 17 20 23 30 31 35
1 26 32 33 39 40 45 47
2 01 02 04 10 25 31 33
7 02 11 17 18 22 25 39
1 01 09 33 35 39 43 45
1 01 11 13 33 34 38 42
5 02 11 17 18 22 34 46
2 02 04 12 18 40 41 43
2 02 05 11 30 31 43 47
2 02 11 24 35 38 43 49
1 02 19 32 36 42 43 46
1 03 12 16 37 38 44 46
2 03 20 24 25 27 37 43
1 04 06 11 34 37 41 46
1 04 19 25 30 31 32 40
1 05 07 08 22 24 33 40
2 05 17 22 32 37 45 46
↓↓↓                  /home/fjf/Desktop