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í
×

včera 12:55 | Nová verze

Byla vydána verze 17.12.0 KDE Aplikací (KDE Applications). Přehled novinek v kompletním seznamu změn a na stránce s dalšími informacemi. Aplikace, které nebyly dosud portovány na KDE Frameworks 5, byly z KDE Aplikací odstraněny.

Ladislav Hagara | Komentářů: 18
včera 03:00 | Komunita

Na Humble Bundle lze získat počítačovou hru Company of Heroes 2 (Wikipedie, YouTube) běžící také v Linuxu zdarma. Speciální akce končí v sobotu v 19:00.

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

Christian Kellner představil na svém blogu projekt Bolt řešící bezpečnost rozhraní Thunderbolt 3 na Linuxu. Pomocí příkazu boltctl nebo rozšíření GNOME Shellu lze komunikovat s démonem boltd a například zakázat neznámá zařízení a předejít tak útokům typu Thunderstrike nebo DMA.

Ladislav Hagara | Komentářů: 6
včera 01:00 | Nová verze

Po půl roce vývoje od vydání verze 11.0 byla vydána verze 11.1 svobodného softwaru pro vytváření datových úložišť na síti FreeNAS (Wikipedie). Nejnovější FreeNAS je postaven na FreeBSD 11.1. Přehled novinek v příspěvku na blogu. Zdůraznit lze zvýšení výkonu OpenZFS, počáteční podporu Dockeru nebo synchronizaci s cloudovými službami Amazon S3 (Simple Storage Services), Backblaze B2 Cloud, Google Cloud a Microsoft Azure

Ladislav Hagara | Komentářů: 0
14.12. 23:55 | Nová verze

Po dvou měsících vývoje od vydání verze 235 oznámil Lennart Poettering vydání verze 236 správce systému a služeb systemd (GitHub, NEWS).

Ladislav Hagara | Komentářů: 6
14.12. 20:00 | Nová verze Ladislav Hagara | Komentářů: 0
14.12. 19:33 | Pozvánky

Pražská Fedora 27 Release Party, oslava nedávného vydání Fedory 27, se uskuteční 19. prosince od 19:00 v prostorách společnosti Etnetera (Jankovcova 1037/49). Na programu budou přednášky o novinkách, diskuse, neřízený networking atd.

Ladislav Hagara | Komentářů: 0
14.12. 18:11 | Nová verze

Byla vydána verze 2.11.0 QEMU (Wikipedie). Přispělo 165 vývojářů. Provedeno bylo více než 2 000 commitů. Přehled úprav a nových vlastností v seznamu změn.

Ladislav Hagara | Komentářů: 0
14.12. 17:44 | Komunita

Canonical oznámil dostupnost kryptografických balíčků s certifikací FIPS 140-2 úrovně 1 pro Ubuntu 16.04 LTS pro předplatitele podpory Ubuntu Advantage Advanced. Certifikace FIPS (Federal Information Processing Standards) jsou vyžadovány (nejenom) vládními institucemi USA.

Ladislav Hagara | Komentářů: 3
14.12. 16:11 | Zajímavý software

Společnost Avast uvolnila zdrojové kódy svého dekompilátoru RetDec (Retargetable Decompiler) založeného na LLVM. Vyzkoušet lze RetDec jako webovou službu nebo plugin pro interaktivní disassembler IDA. Zdrojové kódy RetDec jsou k dispozici na GitHubu pod open source licencí MIT.

Ladislav Hagara | Komentářů: 3
Jak se vás potenciálně dotkne trend odstraňování analogového audio konektoru typu 3,5mm jack z „chytrých telefonů“?
 (8%)
 (1%)
 (1%)
 (1%)
 (76%)
 (14%)
Celkem 997 hlasů
 Komentářů: 45, poslední 1.12. 19:00
    Rozcestník

    Dotaz: Prohození řádků

    3.8.2009 20:01 he
    Prohození řádků
    Přečteno: 501×
    Prohození řádků. Potřebuji prohodit řádky, a to tak že první má být předposlední, druhý poslední, třetí -> čtvrtý od konce, čtvrtý -> třetí od konce, .., až předposlední -> první a poslední -> druhý. Studiem z tohoto odkazu http://sed.sourceforge.net/sed1line_cz.html jsem se dostal do stadia, že si dokážu pomoci pospojováním dvojic řádků (i s odmazáním počátečních mezer) a pak je jen přehodím příkazem tac, ale není to přesně ono: cat soubor | sed 's/^[ \t]*//' | sed '$!N;s/\n/ /' | tac. Nejsem v regulárních výrazech moc zběhlý a nevím, dá-li se to napsat jedním-dvěma příkazy. Budu vděčný za jakoukoli radu.

    Odpovědi

    3.8.2009 22:28 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků

    #!/usr/bin/perl

    use strict;
    use warnings;

    my @foo;
    my @bar;

    while(<>) {
    push @foo, $_;
    do { unshift @bar, @foo; @foo = (); } if @foo == 2;
    };

    print foreach @bar;

    3.8.2009 22:30 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků

    .. pokud jsem to teda pochopil spravne a melo to delat tohle:

    > seq 1 6 | ./hehe
    5
    6
    3
    4
    1
    2
     

    3.8.2009 23:21 he
    Rozbalit Rozbalit vše Re: Prohození řádků
    Ano, přesně toto. Ale jak to spustím? Ten skript jsem uložil jako hehe, ale když ho spustím jako cat soubor | ./hehe, tak mi to vyhodí bash: ./hehe: Permission denied. Nedám to ani přes sudo ani jako sudo cat soubor | seq 1 6 | ./hehe
    3.8.2009 23:34 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků

    hehe .. netreba ukladat jako hehe, ale proti gustu zadnej disputat .. hehe

    co se tyce permissions denied, tak to tipuju na opomenute `chmod +x hehe` .. hehe ;)

     

    .. aneb. musis tomu priradit executable flag :D .. muehehe

    3.8.2009 23:40 he
    Rozbalit Rozbalit vše Re: Prohození řádků
    Jede to! Mám se ještě co učit, a hlavně základy. Tady je vidět, že v Perlu je skryt obrovský potenciál. Díky
    3.8.2009 23:47 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků

    np, urw

    4.8.2009 23:16 salam
    Rozbalit Rozbalit vše Re: Prohození řádků
    hehe
    3.8.2009 23:37 FooBar
    Rozbalit Rozbalit vše Re: Prohození řádků

    seq 1 6 | sed 'N;s/\([^\n]*\)\n\(.*\)/\2\n\1/' | tac

    3.8.2009 23:45 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků

    shell brainfucks Vs perl brainpetting?

    nemam rad kod, u kteryho musim za tejde badat, *jak *jsem *to *k *certu *tenkrat *myslel ..

    4.8.2009 11:46 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Pokud umíte perl, nemusíte u něj po týdnu bádat "jak jsem to k čertu myslel", prostě si to přečtete. Pokud umíte sed, nemusíte u něj po týdnu bádat "jak jsem to k čertu myslel", prostě si to přečtete.

    Takže váš výlev říká jen prosté "buď mám krátkou paměť, nebo sed, nebo oboje, nebo 'nepíši do zdrojáků komentáře'". Ale se vším se dá něco dělat, pokud člověk chce, paměť se dá trénovat, sed se dá naučit a komentáře se dá naučit a zvyknout psát :)
    4.8.2009 17:15 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků
    muehehe .. nevim jake jsou Vase zkusenosti s programovanim, ale imho vetsina programatoru ma zpetne problem po urcite dobe *vratit se z5 do projektu, kterej napsali. alespon ja urcite, pac vetu ::

    ".. wtf, jak jsem to tenkrat myslel" si v duchu rikam pomerne casto .. ;)

    btw. *se *svym sedovskym nebo perlovskym RE brainfuckem mam temer chronicke problemy

    btw2. co se tyce tohodle konkretniho prikladu tak me by trvalo dat dohromady zadanou ulohu pomoci RE dele, nez nadatlit behem 30s (v zavislosti na rychlosti psani) z logickeho hlediska tuto elementarni ulohu v perlu ..
    4.8.2009 21:33 he
    Rozbalit Rozbalit vše Re: Prohození řádků
    Poněvadž jsem svým dotazem rozpoutal diskusi zastánců dvou rozdílných táborů, rozhodl jsem se, že provedu malý test. Vzal jsem reálný textový soubor o velikosti ~3 MB a ~54 tisíc řádků a prohnal jej pokaždé třikrát sedem a perlem. Výstupem byla konzole v GUI. Zde jsou výsledky:

    sed.time: 8.329s, 9.58s a 8.942s. avg.time=8.95033333s

    perl.time: 8.59s, 8.44s a 7.94s. avg.time=8.32333333s

    Porovnáním průměrných hodnot časů lze vypozorovat, že perl dává o 7% rychlejší odpověď.

    Spustil jsem tedy ještě jeden test, tentokrát syntetický, s výstupem do /dev/null. time seq 1 1000000 | sed 'N;s/\([^\n]*\)\n\(.*\)/\2\n\1/' | tac > /dev/null: 7.161s, 7.277s a 7.201s. avg.time=7.213s

    time seq 1 1000000 | ./hehe > /dev/null: 2.803s, 2.828s, 2.914s. avg.time=2.8483333333s

    Zde si vedl perl o 60% lépe a to už nelze přehlédnout.
    4.8.2009 23:26 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    No ono vždy záleží na tom, jak moc "blbě" se to napíše. Takže začneme optimalizovat?

    Mně zatím vychází lépe sed, předpokládám že to je tím, že ho umím lépe než perl, který jsem se tedy optimalizovat nesnažil ;)
    bash$ time seq 1 1000000 | ./hehe > /dev/null
    
    real    0m1.189s
    user    0m1.764s
    sys     0m0.056s
    
    bash$ time seq 1 1000000 | sed -n 'h;n;p;g;p' | tac > /dev/null
    
    real    0m0.862s
    user    0m0.964s
    sys     0m0.048s
    
    
    4.8.2009 23:29 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Co do počtu znaků vede sed samozřejmě také, ale to asi už zůstane.
    bash$ wc -c hehe
    166 hehe
    
    bash$ wc -c <<<"sed -n 'h;n;p;g;p' | tac"
    25
    
    5.8.2009 00:01 FooBar
    Rozbalit Rozbalit vše Re: Prohození řádků

    Sakra, hodit to do hold bufferu mne nejak vubec nenapadlo, dobry a elegantni!:-)

    5.8.2009 08:15 Petr
    Rozbalit Rozbalit vše Re: Prohození řádků

    Dobrý řešení, tady je ještě o 2 znaky kratší (a možná i rychlejší, ale neměřil jsem to), s vypuštěním mezer okolo svislítka dokonce o 4 znaky :)

    $ wc -c <<<"sed -n 'h;n;G;p'|tac"
    21
    $

    5.8.2009 15:15 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Ještě o znak sed 'x;n;$G' | tac pokud bych se povznesl nad prázdné řádky na konci :)
    5.8.2009 15:16 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Vlastně to bylo o 4 znaky díky absenci -n
    5.8.2009 15:53 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Jen škoda že je to pořád o jeden znak delší než perl ;)

    sed 'x;n;$G'|tac 
    #!/usr/bin/perl
    4.8.2009 22:56 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Stále zůstáváme u toho, že umíte lépe perl než sed. Já umím lépe sed, takže bych tuto elementární úlohl napsal v sedu, vy umíte lépe perl, tak byste tuto elementární úlohu nadatlil v perlu. Pokud by nám záleželo na výkonu, tak bychom to oba nadatlili v tom, co by bylo výkonnější.

    Vracet se k staršímu projektu je vždycky trochu náročné a programátor, který se má rád, asi programuje tak, aby to po sobě i po delší době přečetl, a nesnaží se o nějakou optimalizaci algoritmů hraničící s kryptografií (vyjma kritických míst samozřejmě, tam pak nastupují dekryptovací komentáře :D)
    4.8.2009 23:25 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    No ono vždy záleží na tom, jak moc "blbě" se to napíše. Takže začneme optimalizovat?

    Mně zatím vychází lépe sed, předpokládám že to je tím, že ho umím lépe než perl, který jsem se tedy optimalizovat nesnažil ;)
    bash$ time seq 1 1000000 | ./hehe > /dev/null
    
    real    0m1.189s
    user    0m1.764s
    sys     0m0.056s
    
    bash$ time seq 1 1000000 | sed -n 'h;n;p;g;p' | tac > /dev/null
    
    real    0m0.862s
    user    0m0.964s
    sys     0m0.048s
    5.8.2009 00:53 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků

    ad.1) vase reseni aka  'h;n;p;g;p' je moc hezke .. neznal jsem.

     

    ad.2) obe reseni maji presto jednu nevyhodu .. na skutecnem unixovem systemu se v lepsim pripade chovaji jinak nez na Linuxu (rozumej nepredvidatelne) .. v horsim nefungujou vubec :D .. ps. je to 1:1 (neprevidatelne:nefungujou .. a to neni dobra bilance ..)

    testovano na:

    SunOS t5240-s10u7 5.10 Generic_139555-08 sun4v sparc SUNW,T5240

    FreeBSD 7.2-RELEASE

     

    5.8.2009 01:03 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Souhlasím s tím, že používat jiný sed než GNU sed je nesmyslné sebemrskačství :D asi jako snažit se skriptovat na HP-UX. Na kvalitní práci je potřeba kvalitní nástroj (perl, GNU sed, C...).
    5.8.2009 01:06 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Aby nebylo špatně pochopeno, i GNU sed může být posix compliant (--posix), ale musí to být GNU sed, ne nějaký nedodělek na UNIXu.
    5.8.2009 00:26 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků

    mistre :D .. ok, pokud chceme *nekde *zustavat tak si ujasneme pojmy ::

    a) neskromne si myslim, ze sed umim stejne jako perl a ne-li lepe .. sed == REs a ty jsou vsude stejne

     

    b) to co vy zovete sed je v pravem slova smyslu GNU-sed .. me hlavni zamereni se netyka paznechtu jmenem GNU ale POSIX compliant systemu (jako napr unixove systemy, neplest s Linuxem ktery je unix-like) .. vas kod bohuzel nefunguje jinde nez na Linuxu (osobne jsem zkousel bsd a solaris) .. mozna proto pristupuju k sedu a obecne ke GNU optimalizacim pomerne podezrivave a skepticky ..

     

    c) tato uloha nema podle me co docineni s REs. to, ze to lze pomoci REs resit *take snad jeste neznamena, ze se tady budeme hadat a osocovat co kdo umi lepe a co je ciste .. to dle meho skromneho nazoru GNU-sed rozhodne neni.

    cela tato diskuse zacala moji nevinnou poznamkou o brainfucku pomoci REs .. nemyslel jsem tim, ze vas brainfuck je spatne napsanej, pomalej nebo nedejboze *necistej. myslel jsem tim, ze v tomto pripade jste sice zvolil funkcni, nicmene brute-force metodu .. aneb jak by se to chovalo, kdyby to melo parsovat radky s nestandartni delkou

     

    toto je primitivni operace ktera se sklada z jednoduche direktivy :: "kazde dva radky co jdou za sebou vem a umisti je *pred dvojku radku co byla predchozi .." .. jakekoliv dalsi laborovani a nebo manipulovani je *pointless ;)

     

    nemyslim to nijak konfrontacne, ale pobavil jste me vasi neskryvanou znalosti GNU-sedu a zejmena receptem pro vsechny programatory, jak se stale udrzet v projektu .. obavam se, ze vase metoda mozna pomaha v jednodussich shellovych skriptech, nikoliv vsak v pripadech, kdy se brainfuck neskryva v necem tak mrzkem jako jednotlivy RE/algoritmus, ale v komplexnosti a provazani pouzitych metod :D

     

    zdravim

    5.8.2009 00:51 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Moc nechápu smysl příspěvku a proto jen upřesním že vámi zmiňovaný kód v sedu s RE jsem nepsal já, já napsal optimalizovaný kód sed -n 'h;n;p;g;p' | tac, myslím že je POSIX compliant.

    Můžete si povšimnout, že tam není žádná RE, on sed je více než jen RE, je to hlavně o streamovém editování, ale nechci zacházet do hloubky, abyste to třeba zase nebral mylně jako nějaké poučování podobně, jako jste mylně interpretoval mou prostou úvahu o programátorech :D
    5.8.2009 00:56 nettezzaumana
    Rozbalit Rozbalit vše Re: Prohození řádků

    viz. prispevky vyse ..

     

    prvni prispevek jsem dopsal az pote co jsem si *vsiml, jak jste optimalizoval .. a to se mi libi, hezky jste to udelal

    thx, good to know it

    5.8.2009 19:12 FooBar
    Rozbalit Rozbalit vše Re: Prohození řádků

    Ja se omlouvam, ale co si mam predstavit (rikejte mi vojin Kefalin) pod takym pojmom "radky s nestandartni delkou"?:)

    5.8.2009 21:41 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    Kolega se zaměřuje i na ne-gnu nástroje běžící na všelijakých platformách jako Sun, BSD, takže tam mohou přijít v potaz různá omezení, jako třeba 4OKB max. délka řádky u sedu, 3000 znaků u awk a podobně, popřípadě to můžete chtít použít na nějaké mašině běžící ještě od 70. let bez aktualizace... ;) ;) ;)
    5.8.2009 22:08 FooBar
    Rozbalit Rozbalit vše Re: Prohození řádků

    Ah, uz chapu co chce rict... ackoliv bych se mozna v tom pripade branil formulaci "standarDni delka radku" :)

    4.8.2009 12:11 FooBar
    Rozbalit Rozbalit vše Re: Prohození řádků

    Troufl bych si rict, ze to je tim, ze umis dobre perl a neumis dobre sed:) Moje situace je presne obracena, Perlem nevladnu a na tvuj kod jsem se musel soustredit,... rekl bych, ze neni zadny X vs Y, je to vec zcela subjektivnich preferenci

    4.8.2009 11:42 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Prohození řádků
    +1, sed rulez, jednoduché, čitelné, přímočaré, žádné velké programování ;)

    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.