abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
AbcLinuxu hledá autory!
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
eParkomat, startup z ČR, postoupil mezi finalisty evropského akcelerátoru ChallengeUp!
Robot na pivo mu otevřel dveře k opravdovému byznysu
Internet věcí: Propojený svět? Už se to blíží...
dnes 12:00 | Zajímavý projekt

Projekt Termbox umožňuje vyzkoušet si linuxové distribuce Ubuntu, Debian, Fedora, CentOS a Arch Linux ve webovém prohlížeči. Řešení je postaveno na projektu HyperContainer. Podrobnosti v často kladených dotazech (FAQ). Zdrojové kódy jsou k dispozici na GitHubu [reddit].

Ladislav Hagara | Komentářů: 8
dnes 11:00 | Bezpečnostní upozornění

Byly zveřejněny informace o bezpečnostní chybě CVE-2016-8655 v Linuxu zneužitelné k lokální eskalaci práv. Chyba se dostala do linuxového jádra v srpnu 2011. V upstreamu byla opravena minulý týden [Hacker News].

Ladislav Hagara | Komentářů: 0
včera 22:00 | Komunita

Přibližně před měsícem bylo oznámeno, že linuxová distribuce SUSE Linux Enterprise Server (SLES) běží nově také Raspberry Pi 3 (dokumentace). Obraz verze 12 SP2 pro Raspberry Pi 3 je ke stažení zdarma. Pro registrované jsou po dobu jednoho roku zdarma také aktualizace. Dnes bylo oznámeno, že pro Raspberry Pi 3 je k dispozici také nové openSUSE Leap 42.2 (zprávička). K dispozici je hned několik obrazů.

Ladislav Hagara | Komentářů: 5
včera 06:00 | Zajímavý software

OMG! Ubuntu! představuje emulátor terminálu Hyper (GitHub) postavený na webových technologiích (HTML, CSS a JavaScript). V diskusi k článku je zmíněn podobný emulátor terminálu Black Screen. Hyper i Black Screen používají framework Electron, stejně jako editor Atom nebo vývojové prostředí Visual Studio Code.

Ladislav Hagara | Komentářů: 46
včera 06:00 | Zajímavý článek

I letos vychází řada ajťáckých adventních kalendářů. QEMU Advent Calendar 2016 přináší každý den nový obraz disku pro QEMU. Programátoři se mohou potrápit při řešení úloh z kalendáře Advent of Code 2016. Kalendáře Perl Advent Calendar 2016 a Perl 6 Advent Calendar přinášejí každý den zajímavé informace o programovacím jazyce Perl. Stranou nezůstává ani programovací jazyk Go.

Ladislav Hagara | Komentářů: 10
3.12. 16:24 | Nová verze

Byla vydána Mageia 5.1. Jedná se o první opravné vydání verze 5, jež vyšla v červnu loňského roku (zprávička). Uživatelům verze 5 nepřináší opravné vydání nic nového, samozřejmě pokud pravidelně aktualizují. Vydání obsahuje všechny aktualizace za posledního téměř půldruhého roku. Mageia 5.1 obsahuje LibreOffice 4.4.7, Linux 4.4.32, KDE4 4.14.5 nebo GNOME 3.14.3.

Ladislav Hagara | Komentářů: 17
3.12. 13:42 | Pozvánky

V Praze probíhá konference Internet a Technologie 16.2, volné pokračování jarní konference sdružení CZ.NIC. Konferenci lze sledovat online na YouTube. K dispozici je také archiv předchozích konferencí.

Ladislav Hagara | Komentářů: 0
2.12. 22:44 | Komunita

Joinup informuje, že Mnichov používá open source groupware Kolab. V srpnu byl dokončen dvouletý přechod na toto řešení. V provozu je asi 60 000 poštovních schránek. Nejenom Kolabu se věnoval Georg Greve ve své přednášce Open Source: the future for the European institutions (SlideShare) na konferenci DIGITEC 2016, jež proběhla v úterý 29. listopadu v Bruselu. Videozáznam přednášek z hlavního sálu je ke zhlédnutí na Livestreamu.

Ladislav Hagara | Komentářů: 25
2.12. 15:30 | Zajímavý projekt

Společnost Jolla oznámila v příspěvku Case study: Sailfish Watch na svém blogu, že naportovala Sailfish OS na chytré hodinky. Využila a inspirovala se otevřeným operačním systémem pro chytré hodinky AsteroidOS. Použita je knihovna libhybris. Ukázka ovládání hodinek na YouTube.

Ladislav Hagara | Komentářů: 18
2.12. 14:15 | Nová verze

Byla vydána verze 7.1.0 skriptovacího jazyka PHP používaného zejména k vývoji dynamických webových stránek. Jedná se o první stabilní verzi nejnovější větvě 7.1. Přehled novinek v dokumentaci. Podrobnosti v ChangeLogu. K dispozici je také příručka pro přechod z PHP 7.0.x na PHP 7.1.x.

Ladislav Hagara | Komentářů: 7
Kolik máte dat ve svém domovském adresáři na svém primárním osobním počítači?
 (32%)
 (24%)
 (29%)
 (7%)
 (5%)
 (3%)
Celkem 775 hlasů
 Komentářů: 50, poslední 29.11. 15:50
Rozcestník
Reklama

Dotaz: Spojení řádků označených čísly

20.3.2010 12:15 Pan Mantinel
Spojení řádků označených čísly
Přečteno: 713×
Zdravím, měl bych dotaz, vyfiltroval jsem si pomocí grepu řádky obsahující slova unfinished a resumed, výpis vypadá takto:
28135: open("/etc/lib"map.conf3", O_RDONLY, (unfinished ...)
28131: open("/etc/lib"map.conf12", O_RDONLY, (unfinished ...)
28131: (... open resumed)) = 0
28135: (... open resumed)) = -1 ENOENT (No such file or directory)
A potřeboval bych řádky se stejným počátečním číslem spojit do jednoho, aby výstup vypadal takto:
28135: open("/etc/lib"map.conf3", O_RDONLY, (unfinished ...)28135: (... open resumed)) = -1 ENOENT (No such file or directory)
28131: open("/etc/lib"map.conf12", O_RDONLY, (unfinished ...)28131: (... open resumed)) = 0
Tuším způsob, jak to třeba v awk udělat (začít u prvního řádku a porovnávat $1 s ostatními, když se najde shoda, vytisknout), ale vůbec mi nenapadá, jak to nakódit (s awk teprve začínám) a navíc mi tenhle způsob přijde neefektivní a náročný na čas.

Odpovědi

20.3.2010 12:44 buff | skóre: 10 | blog: buff
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
Jestli se celý ten výstup vejde do paměti, tak bych to udělal v perlu:
my %line_pairs;
while (my $line = <>) {
    chomp $line;
    my @fields = split ':', $line;
    my $num = shift @fields;
    $line_pairs{$num} .= join ':', @fields;
}

for my $key (sort keys %line_pairs) {
    print $line_pairs{$key}, "\n";
}
Možná trošku špatně, psáno z hlavy, netestováno.
Víťa Šmíd avatar 20.3.2010 12:57 Víťa Šmíd | skóre: 41 | blog: vituv_blog | Praha
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
AWK řešení, také se text musí vejít do paměti. Testováno :-)
{
	i = $1
	gsub(/:/, "", i)
	lines[i] = lines[i] $0 " "
}

END {
	for (i in lines) {
		print lines[i]
	}
}
When Chuck Norris plays Monopoly, it affects the actual world economy. | Matematika pro normální lidi
kouby avatar 20.3.2010 13:14 kouby | skóre: 27 | blog: init | Praha
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
awk '{if($1 in a){print a[$1]""$0;delete a[$1];}a[$1]=$0}' vstup
That's thirty minutes away. I'll be there in ten.
20.3.2010 13:44 Pan Mantinel
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
Díky moc všem, už mi to trochu objasnilo, jak se vlastně s awk a perlem pracuje. Zatím mi na na první pohled na pochopení přijdou nejjednodušší obě řešení v awk, takže zkusím pořádně pochopit ty.
Víťa Šmíd avatar 20.3.2010 14:58 Víťa Šmíd | skóre: 41 | blog: vituv_blog | Praha
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
Jestli se každé číslo řádku objeví právě dvakrát, je koubyho řešení lepší. To moje lze každopádně zjednodušit na
{
	lines[$1] = lines[$1] $0 " "
}

END {
	for (i in lines) {
		print lines[i]
	}
}
Předtím jsem totiž zapomněl, že pole v AWK mohou jako klíče používat libovolné řetězce.
When Chuck Norris plays Monopoly, it affects the actual world economy. | Matematika pro normální lidi
wamba avatar 20.3.2010 15:55 wamba | skóre: 37 | blog: wamba
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
jak se vlastně s awk a perlem pracuje.
Chcete si to ozkoušet a pak si vybrat. Mně se třeba pracuje lépe s perlem (je univerzálnějším nástrojem než awk, ale uznávám, že může ze awk může vypadat přehledněji).

Samozřejmě v perlu by to šlo taky napsat zkráceně

perl -ane 'chomp ;$line{$F[0]} .= $_; END{print $_,"\n" foreach values(%line)}'
This would have been so hard to fix when you don't know that there is in fact an easy fix.
20.3.2010 16:32 deadmail
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
Vo vseobecnosti je najrychlejsie subor najprv utriedit a potom staci porovnavat za sebou iduce riadky. Staci si teda pamatat len rovnako zacinajuce riadky.

sort subor | awk 'NR == 1 {last_id=$1;last=$0} NR > 1 {if ($1 == last_id) {last = last$0} else {print last; last=$0; last_id=$1}} END {print last}'

Ak je subor vysledkom prikazu
grep
, tak uz asi utriedeny je ;-)
25.3.2010 17:19 pluto
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
a ako by sa do takeho vyrazu dala zakomponovat podmienka nech to spaja len riadky v ktorych sa to unfinished ... a open resumed vyskytuje ?
25.3.2010 20:48 deadmail
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
sort subor | awk 'NR == 1 {last_id=$1;last=$0} NR > 1 {if (($1 == last_id) && ($0 ~ "unfinished|open resumed")) {last = last$0} else {print last; last=$0; last_id=$1}} END {print last}'
25.3.2010 22:56 Nonsens
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
ja len tak...funguje aspon jedna moznost? :DD
26.3.2010 09:11 pluto
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
nie uplne ale myslim ze sa to z toho bude dat poskladat :D
27.3.2010 13:35 Nonsens
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
a ktora moznost je asi taka najidealnejsia?
27.3.2010 17:10 hizo
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
ja by som to tiez potreboval a v awk pracovat neviem. takze ak mam riadky: 3733 execve("/bin/ls", ["ls", "/etc/anacrontab", "/etc/blkid.tab", "/etc/crontab", "/etc/crypttab", "/etc/fstab", "/etc/mtab"], [/* 38 vars */] < unfinished ...>
3733 <... execve resumed> ) = 0
3735 execve("/bin/sed", ["sed", "-n", "1p"], [/* 38 vars */] < unfinished ...>
3735 <... execve resumed> ) = 0
mohol by sem niekto napisat riesenie v awk aby mi to spojilo riadky ktore si odpovedaju tymi zaciatocnymi cislami?dakujem
27.3.2010 15:42 hizo
Rozbalit Rozbalit vše Re: Spojení řádků označených čísly
prosim vas a neda sa to spravit cisto sedmi a grepom??ze napriklad cely vypis suboru budem mat ulozeny v premennej a neda sa to par grepmi a sedmi pospajat??

Založit nové vláknoNahoru

Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

ISSN 1214-1267   www.czech-server.cz
© 1999-2015 Nitemedia s. r. o. Všechna práva vyhrazena.