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 22:22 | Bezpečnostní upozornění

    Branch Privilege Injection (CVE-2024-45332, Paper) je nejnovější bezpečnostní problém procesorů Intel. Intel jej řeší ve včerejším opravném vydání 20250512 mikrokódů pro své procesory. Neprivilegovaný uživatel si například může přečíst /etc/shadow (YouTube).

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

    Dle plánu byl vývoj Firefoxu přesunut z Mercurialu na Git. Oficiální repozitář se zdrojovými kódy je na GitHubu.

    Ladislav Hagara | Komentářů: 3
    včera 04:33 | Bezpečnostní upozornění

    V terminálovém multiplexoru GNU Screen byly nalezeny a v upstreamu ve verzi 5.0.1 už opraveny bezpečnostních chyby CVE-2025-23395, CVE-2025-46802, CVE-2025-46803, CVE-2025-46804 a CVE-2025-46805. Podrobnosti na blogu SUSE Security Teamu.

    Ladislav Hagara | Komentářů: 34
    12.5. 19:33 | Bezpečnostní upozornění

    Training Solo (Paper, GitHub) je nejnovější bezpečnostní problém procesorů Intel s eIBRS a některých procesorů ARM. Intel vydal opravnou verzi 20250512 mikrokódů pro své procesory.

    Ladislav Hagara | Komentářů: 0
    12.5. 11:44 | Nová verze

    Byla vydána nová verze 25.05.11 svobodného multiplatformního video editoru Shotcut (Wikipedie) postaveného nad multimediálním frameworkem MLT. Nejnovější Shotcut je již vedle zdrojových kódů k dispozici také ve formátech AppImage, Flatpak a Snap.

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

    Svobodný elektronický platební systém GNU Taler (Wikipedie, cgit) byl vydán ve verzi 1.0. GNU Taler chrání soukromí plátců a zároveň zajišťuje, aby byl příjem viditelný pro úřady. S vydáním verze 1.0 byl systém spuštěn ve Švýcarsku.

    Ladislav Hagara | Komentářů: 10
    12.5. 00:55 | Pozvánky

    Spolek OpenAlt zve příznivce otevřených řešení a přístupu na 209. brněnský sraz, který proběhne tento pátek 16. května od 18:00 ve studentském klubu U Kachničky na Fakultě informačních technologií Vysokého učení technického na adrese Božetěchova 2/1. Jelikož se Brno stalo jedním z hlavních míst, kde se vyvíjí open source knihovna OpenSSL, tentokrát se OpenAlt komunita potká s komunitou OpenSSL. V rámci srazu Anton Arapov z OpenSSL

    … více »
    Ladislav Hagara | Komentářů: 0
    12.5. 00:22 | Komunita

    GNOME Foundation má nového výkonného ředitele. Po deseti měsících skončil dočasný výkonný ředitel Richard Littauer. Vedení nadace převzal Steven Deobald.

    Ladislav Hagara | Komentářů: 9
    10.5. 15:00 | Zajímavý článek

    Byl publikován přehled vývoje renderovacího jádra webového prohlížeče Servo (Wikipedie) za uplynulé dva měsíce. Servo zvládne už i Gmail. Zakázány jsou příspěvky generované pomocí AI.

    Ladislav Hagara | Komentářů: 29
    9.5. 17:22 | Nová verze

    Raspberry Pi Connect, tj. oficiální služba Raspberry Pi pro vzdálený přístup k jednodeskovým počítačům Raspberry Pi z webového prohlížeče, byla vydána v nové verzi 2.5. Nejedná se už o beta verzi.

    Ladislav Hagara | Komentářů: 6
    Jaký filesystém primárně používáte?
     (57%)
     (1%)
     (8%)
     (22%)
     (4%)
     (2%)
     (2%)
     (1%)
     (0%)
     (3%)
    Celkem 601 hlasů
     Komentářů: 26, poslední 8.5. 09:58
    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: 268×
    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.