Dotaz: Jak secist cisla z vystupu prikazu cut na vice radcich

[Matyáš Dvořák]

Zdravim, mam textovy file s pevnou strukturou kam si pisu odpracovane hodiny a dostal jsem z toho vystup, ktery nevim jak secist v terminalu ve finalni soucet hodin...poradi nekdo co dat za pipe, aby se to secetlo v jednu cifru? :)

local:~ matyas$ grep -in '\-\-' -B1 aaa_hours_May_2014.php | grep -v '\-\-' | cut -f5
6
7
5
7
7
6
6
6
5
local:~ matyas$ 

---

---

Odpovědi

[Matyáš Dvořák]

Napr. niečo ako... cut -f5 | paste -sd+ - | bc

[Matyáš Dvořák]

Super, chvilku mi to psalo parse error a tak jsem se zbavil posledniho plusu pridanim grep -v '^$' co smaze prazdny radky z cutu:

$ grep -in '\-\-' -B1 aaa_hours_May_2014.php | grep -v '\-\-' | cut -f5 | paste -sd+ - | bc
(standard_in) 2: parse error

$ grep -in '\-\-' -B1 aaa_hours_May_2014.php | grep -v '\-\-' | cut -f5 | paste -sd+ -
6+7+5+7+7+6+6+6+5+

$ grep -in '\-\-' -B1 aaa_hours_May_2014.php | grep -v '\-\-' | cut -f5 | grep -v '^$' | paste -sd+ -
6+7+5+7+7+6+6+6+5

$ grep -in '\-\-' -B1 aaa_hours_May_2014.php | grep -v '\-\-' | cut -f5 | grep -v '^$' | paste -sd+ - | bc
55

Diiiiky!!!!!!!

[drunkezz]

| awk '{i+=$1} END {print $i}'

D.

[Matyáš Dvořák]

priklad s awk jsem taky vyzkousel, ale prazdny vystup, nicmene diky!

[KrisKo]

je tam drobny preklep..

| awk '{i+=$1} END {print i}'

[mhepp]

s=0; grep -in '\-\-' -B1 aaa_hours_May_2014.php | grep -v '\-\-' | cut -f5 | while read i; do s=$(($s+$i)); done; echo "$s";

případně:

(echo "s=0"; grep -in '\-\-' -B1 aaa_hours_May_2014.php | grep -v '\-\-' | cut -f5 | while read i; do echo "i=i+$i"; done; echo "i";) | bc -l

[wamba]

... | cut -f5 | perl6 -e 'say [+] lines'

:)

[Matyáš Dvořák]

-bash: perl6: command not found

[Matyáš Dvořák]

grep '\-\-' -B1 ../aaa_hours_June_2014.php | grep -v '\-\-' | cut -f5  | perl -e 'say [+] lines'
Bareword found where operator expected at -e line 1, near "] lines"
	(Missing operator before lines?)
syntax error at -e line 1, near "say ["
Execution of -e aborted due to compilation errors.

[ET]

... | tr '\n' '+' | sed 's/+$/\n/' | bc

[Matyáš Dvořák]

(standard_in) 1: parse error

[wamba]

k čemu je u toho prvního grepu to -in? jestli to dobře chápu, tak chcete sečíst čísla v 5 sloupci(podle tab) na řádcích předcházející řádku obsahující --

tak Perl-em "nehezky" např.

perl -aF'\t' -nE '$sum+=$pred if /--/; $pred=$F[4]; END{say $sum}' aaa_hours_May_2014.php

[Matyáš Dvořák]

k čemu je u toho prvního grepu to -in?

pravda k nicemu, je to sila zvyku..

jestli to dobře chápu, tak chcete sečíst čísla v 5 sloupci(podle tab) na řádcích předcházející řádku obsahující --

tak Perl-em "nehezky" např.

perl -aF'\t' -nE '$sum+=$pred if /--/; $pred=$F[4]; END{say $sum}' aaa_hours_May_2014.php

Tohle reseni se mi libi ze je bez pipes a funguje dobre, jelikoz nedelam v perlu, tak preferuju tohle, opravuji bez -in u grepu ;)

grep '\-\-' -B1 ../aaa_hours_June_2014.php | grep -v '\-\-' | cut -f5 | grep -v '^$' | paste -sd+ - | bc