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í
×
    dnes 03:33 | IT novinky

    Google postupně zpřístupňuje českým uživatelům Režim AI (AI Mode), tj. nový režim vyhledávání založený na umělé inteligenci. Režim AI nabízí pokročilé uvažování, multimodalitu a možnost prozkoumat jakékoliv téma do hloubky pomocí dodatečných dotazů a užitečných odkazů na weby.

    Ladislav Hagara | Komentářů: 0
    včera 18:11 | Nová verze

    Programovací jazyk Python byl vydán v nové major verzi 3.14.0. Podrobný přehled novinek v aktualizované dokumentaci.

    Ladislav Hagara | Komentářů: 2
    včera 16:33 | IT novinky

    Bylo oznámeno, že Qualcomm kupuje Arduino. Současně byla představena nová deska Arduino UNO Q se dvěma čipy: MPU Qualcomm Dragonwing QRB2210, na kterém může běžet Linux, a MCU STM32U585 a vývojové prostředí Arduino App Lab.

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

    Multiplatformní open source voxelový herní engine Luanti byl vydán ve verzi 5.14.0. Podrobný přehled novinek v changelogu. Původně se jedná o Minecraftem inspirovaný Minetest v říjnu loňského roku přejmenovaný na Luanti.

    Ladislav Hagara | Komentářů: 0
    včera 13:22 | Nová verze

    Byla vydána nová stabilní verze 6.10 (YouTube) multiplatformního frameworku a GUI toolkitu Qt. Podrobný přehled novinek v poznámkách k vydání.

    Ladislav Hagara | Komentářů: 0
    6.10. 23:55 | Komunita

    Ubuntu 26.04 LTS bude (𝕏) Resolute Raccoon (rezolutní mýval).

    Ladislav Hagara | Komentářů: 4
    6.10. 21:00 | Nová verze

    Netwide Assembler (NASM) byl vydán v nové major verzi 3.00. Přehled novinek v poznámkách k vydání v aktualizované dokumentaci.

    Ladislav Hagara | Komentářů: 0
    6.10. 20:11 | Komunita

    Linuxová distribuce Frugalware (Wikipedie) ke konci roku 2025 oficiálně končí.

    Ladislav Hagara | Komentářů: 0
    6.10. 17:22 | Nová verze

    Byla vydána nová verze 3.0.6 svobodné aplikace pro úpravu a vytváření rastrové grafiky GIMP (GNU Image Manipulation Program). Přehled novinek v oznámení o vydání a v souboru NEWS na GitLabu. Nový GIMP bude brzy k dispozici také na Flathubu.

    Ladislav Hagara | Komentářů: 0
    6.10. 16:11 | IT novinky

    Americký výrobce čipů AMD uzavřel s americkou společností OpenAI smlouvu na několikaleté dodávky vyspělých mikročipů pro umělou inteligenci (AI). Součástí dohody je i předkupní právo OpenAI na přibližně desetiprocentní podíl v AMD.

    Ladislav Hagara | Komentářů: 1
    Jaké řešení používáte k vývoji / práci?
     (39%)
     (46%)
     (15%)
     (17%)
     (21%)
     (15%)
     (18%)
     (16%)
     (16%)
    Celkem 192 hlasů
     Komentářů: 13, poslední dnes 07:41
    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: 274×
    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.