Телеграмм чат группы pro

асоциальный пикотран... in pro.bash

11:32пожаловаться #3

аᶘ

у тебя там может быть вариант word1 lalala abc в качестве исходной строки?

асоциальный пикотранзистор ᶘಠᴥಠᶅ

11:32пожаловаться #4

лохматый in pro.bash

у тебя там может быть вариант word1 lalala abc в качестве исходной строки?

ага, я тупой - просто скопипастил твой ответ и в файл попало word1 lalala abc

асоциальный пикотранзистор ᶘಠᴥಠᶅ

11:34пожаловаться #5

лохматый in pro.bash

printf "word1 a\nword1 b\nword1 c\nword2 d\nword3 e\n" | awk '{ data[$1] = data[$1] $2 " " } END { for (idx in data) print(idx " " data[idx]) }'

awk '{ data[$1] = data[$1] $2 " " } END { for (idx in data) print(idx " " data[idx]) }' работает как надо

∀

А как же чистый bash?(

declare -A arr=(); while read -r key val; do arr[$key]+=" $val"; done < <(printf "word1 1 ff\nword1 1\nword1 2\nword2 d\nword3 e\n"); for key in "${!arr[@]}"; do echo "$key${arr[$key]}"; done

11:37пожаловаться #8

лохматый

всем привет.
ребята, подскажите где бы почитать, чтобы понять, как слить несколько строк по повторяющемуся первому слову
из этого:
word1 lalala
word1 bla
word2 lalala
word2 foo
word3 lalala
word3 123123
word3 foo

сделать:
word1 lalala bla
word2 lalala foo
word3 lalala 123123 foo
?

perl -F'/\s+/' -nlE 'push @{$word{$F[0]}}, $F[1]; END { say join " ", $_, @{$word{$_}} for keys %word}' test.txt
word1 lalala bla
word2 lalala foo
word3 lalala 123123 foo

12:37пожаловаться #9

raku -ne 'my %h; %h.push: .split(/\s+/); END { for %h.kv -> $k, $v { say join " ", $k, $v;} }' test.txt
word3 lalala 123123 foo
word1 lalala bla
word2 lalala foo

13:43пожаловаться #10

Vikentsi in pro.bash

Vyacheslav Koval

raku -ne 'my %h; %h.push: .split(/\s+/); END { for %h.kv -> $k, $v { say join " ", $k, $v;} }' test.txt
word3 lalala 123123 foo
word1 lalala bla
word2 lalala foo

это что ? raku ? язык?

13:44пожаловаться #11

Vikentsi in pro.bash

просто на awk похоже

13:44пожаловаться #12

Home page for Raku, the newest member of the family of languages known as Perl.

да, язык - бывший Perl 6 https://raku.org/

raku.org

Raku Programming Language

13:44пожаловаться #13

Vikentsi in pro.bash

:) да уж, не удивлюсь уже примеру на Lisp от emacs пользователей

13:45пожаловаться #14

Можно еще вот так:

raku -ne 'my %h; %h.push: .split(/\s+/); END { %h.pairs>>.join>>.say }' test.txt
word2   lalala foo
word1   lalala bla
word3   lalala 123123 foo

Только между wordN и остальным текстом добавляется \t

13:50пожаловаться #15

Vyacheslav Koval

Можно еще вот так:

raku -ne 'my %h; %h.push: .split(/\s+/); END { %h.pairs>>.join>>.say }' test.txt
word2   lalala foo
word1   lalala bla
word3   lalala 123123 foo

Только между wordN и остальным текстом добавляется \t

Слава, пожалуйста, напиши еще на Ruby, знаю ты можешь. А мне тут некогда, надо дело делать.

14:52пожаловаться #16

Но! В качестве справедливости.

14:53пожаловаться #17

Еще на Ruby. По вызову языков общего назначения в CLI BASH - Слава это дело умеет. От него я много перенял.

14:53пожаловаться #18

Ну с другой стороны, как так? Perl есть, а Ruby и Python - нет.

14:54пожаловаться #19

И JS нет. Давайте уж исправим.