abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
    dnes 14:44 | IT novinky Ladislav Hagara | Komentářů: 3
    dnes 09:00 | Zajímavý software

    Jose Fernandez z Netflixu představil nástroj bpftop pro monitorování eBPF programů.

    Ladislav Hagara | Komentářů: 0
    dnes 08:00 | Nová verze

    Incus (GitHub), komunitní fork nástroje pro správu kontejnerů LXD, byl vydán ve verzi 0.6 (YouTube). Vyzkoušet jej lze online ve webovém prohlížeči.

    Ladislav Hagara | Komentářů: 0
    včera 19:22 | IT novinky

    Společnost Broadcom prodává svou End-User Computing (EUC) Division (Workspace ONE a Horizon) koupenou se společností VMware investiční společnosti KKR za 4 miliardy dolarů.

    Ladislav Hagara | Komentářů: 0
    včera 14:44 | IT novinky

    Začal veletrh MWC Barcelona 2024 (Mobile World Congress). Firmy představují své novinky. Lenovo například ThinkBook s průhledným displejem (YouTube).

    Ladislav Hagara | Komentářů: 1
    včera 12:55 | Nová verze

    Byla vydána nová verze 1.46.0 sady nástrojů pro správu síťových připojení NetworkManager. Novinkám se v příspěvku na blogu NetworkManageru věnuje Fernando F. Mancera. Vypíchnout lze podporu randomizace MAC adresy na základě Wi-Fi sítě (wifi.cloned-mac-address=stable-ssid). Schváleno pro Fedora Linux 40.

    Ladislav Hagara | Komentářů: 0
    25.2. 22:00 | Zajímavý článek

    Byly zveřejněny výsledky průzkumu mezi vývojáři v programovacím jazyce Rust: 2023 Annual Rust Survey Results. Téměř 70 % účastníků průzkumu vyvíjí na Linuxu, 85 % pro Linux, téměř 62 % používá Visual Studio Code, …

    Ladislav Hagara | Komentářů: 5
    25.2. 21:11 | Nová verze

    Dlaždicový správce oken, resp. kompozitor pro Wayland Sway byl vydán ve verzi 1.9 založené na wlroots 0.17. Měl by poskytovat lepší výkon a přidává několik konfiguračních voleb, příkazů atd.

    Fluttershy, yay! | Komentářů: 0
    25.2. 13:33 | Nová verze

    Byla vydána nová verze 2.44.0 distribuovaného systému správy verzí Git. Přispělo 85 vývojářů, z toho 34 nových. Přehled novinek v příspěvku na blogu GitHubu a v poznámkách k vydání.

    Ladislav Hagara | Komentářů: 0
    24.2. 17:11 | Nová verze

    KiCad (Wikipedie), sada svobodných softwarových nástrojů pro počítačový návrh elektronických zařízení (EDA), byl vydán v nové major verzi 8.0.0 (𝕏). Přehled novinek v příspěvku na blogu.

    Ladislav Hagara | Komentářů: 2
    Kolik máte nálepek na víku notebooku?
     (18%)
     (59%)
     (5%)
     (3%)
     (5%)
     (9%)
    Celkem 406 hlasů
     Komentářů: 15, poslední včera 21:46
    Rozcestník

    Dotaz: Perl oneliner substituce s pocitanim

    22.9.2014 15:07 Terka | skóre: 13
    Perl oneliner substituce s pocitanim
    Přečteno: 250×
    Ahoj, poradite mi jak upravit oneliner aby vyhovoval zadani a pocital soucet sloupcu:

    vstup:1 2 vystup:1 2 3

    echo "1 2"|perl -ple 's:(.) (.):$1 $2

    neco jako echo "1 2"|perl -ple 's:(.) (.):$1 $2 $1+$2:e' mi nefunguje Diky!

    Řešení dotazu:


    Odpovědi

    wamba avatar 22.9.2014 16:42 wamba | skóre: 38 | blog: wamba
    Rozbalit Rozbalit vše Re: Perl oneliner substituce s pocitanim
    pokud se budu držet vašeho "řešení", pak třeba echo "1 2"|perl -ple 's/(.) (.)/join q{ }, ($1,$2,$1+$2)/e'
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    22.9.2014 16:57 Terka | skóre: 13
    Rozbalit Rozbalit vše Re: Perl oneliner substituce s pocitanim
    Diky. Jde mi o to zda se da zaroven nahrazovat a pocitat. Mam slozitejsi log a neco oznacuji do skupin (), neco vynechavam a pak tiskunu ony vybrane() v jinem poradi a nektere potrebuji scitat Rada bych to delala pres podobny oneliner viz vyse.
    22.9.2014 17:17 Terka | skóre: 13
    Rozbalit Rozbalit vše Re: Perl oneliner substituce s pocitanim
    Nefunguje mi to. Nechapu to join q{}
    Budu tedy konkretni:
    [INFO ][Aug 08|00:02:46.176][Thread-363][Threadname] ====== done [XX], CorrID:[398912771023675], Times:(MRqC: 0, MRqM: 0, M: 416, MReP: 1, ALL: 417)
    perl -ple 's:(\[.+?\])(\[.+?\])(\[.+?\])(\[.+?\]) =.+?\[(..)\],( CorrID.+?\]), Times\:\((.+)( M\: | G\: | IR\: )(\d+)(.*)ALL\: (\d+)\):$2;$3;$4;$5;$11;$6;$11-$9;$9:g'
    tam kde je tucna, bych rada mela rozdil $11-$9
    Diky!
    Řešení 1× (Terka (tazatel))
    22.9.2014 18:26 luky
    Rozbalit Rozbalit vše Re: Perl oneliner substituce s pocitanim
    perl -ple 's:(\[.+?\])(\[.+?\])(\[.+?\])(\[.+?\]) =.+?\[(..)\],( CorrID.+?\]), Times\:\((.+)( M\: | G\: | IR\: )(\d+)(.*)ALL\: (\d+)\):join ";",$2,$3,$4,$5,$11,$6,$11-$9,$9:e'
    22.9.2014 19:24 Terka | skóre: 13
    Rozbalit Rozbalit vše Re: Perl oneliner substituce s pocitanim
    Diky moc, tohle chapu. ;)
    22.9.2014 16:55 luky
    Rozbalit Rozbalit vše Re: Perl oneliner substituce s pocitanim
    echo 1 2 3 4 | perl -MList::Util -pale '$_ .= " " . List::Util::sum @F;'
    1 2 3 4 10
    xkucf03 avatar 23.9.2014 11:09 xkucf03 | skóre: 49 | blog: xkucf03
    Rozbalit Rozbalit vše Re: Perl oneliner substituce s pocitanim
    Přehlednější mi přijde spíš tenhle způsob:
    echo "1 2" | perl -ne 'if (/(\d) (\d)/) { print "$1 + $2 = " . ($1 + $2) . "\n"; }'
    a složitější věci bych stejně radši rozepsal na víc řádků.
    #!/bin/bash
    
    echo "1 2" | perl -ne '
        if (/(\d) (\d)/) {
            print "$1 + $2 = " . ($1 + $2) . "\n";
        }';
    Mám rád, když se lidé přou, znamená to, že vědí, co dělají, a že mají směr. Frantovo.cz, SQL-DK, Relational pipes

    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.