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:55 | Nová verze

    Byl vydán Debian 12.11, tj. jedenáctá opravná verze Debianu 12 s kódovým názvem Bookworm. Řešeny jsou především bezpečnostní problémy, ale také několik vážných chyb. Instalační média Debianu 12 lze samozřejmě nadále k instalaci používat. Po instalaci stačí systém aktualizovat.

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

    Makepad dospěl do verze 1.0 (𝕏). Jedná se o multiplatformní open source UI framework pro Rust napsaný v Rustu.

    Ladislav Hagara | Komentářů: 3
    16.5. 17:11 | Komunita

    Konference OpenAlt 2025 hledá přednášející. Proběhne o víkendu 1. a 2. listopadu na půdě Fakulty informačních technologií VUT v Brně. Témata konference jsou: Otevřený a svobodný software, IoT a Hnutí tvůrců, Vzdělávání, Bezpečnost a soukromí, Otevřená společnost, komunity a data, OpenMobility a další.

    Ladislav Hagara | Komentářů: 0
    16.5. 15:33 | Zajímavý článek

    Nové číslo časopisu Raspberry Pi zdarma ke čtení: Raspberry Pi Official Magazine 153 (pdf)

    Ladislav Hagara | Komentářů: 0
    16.5. 12:22 | Komunita

    Byl publikován květnový přehled dění a novinek z vývoje Asahi Linuxu, tj. Linuxu pro Apple Silicon. Vývojáře lze podpořit na Open Collective a GitHub Sponsors.

    Ladislav Hagara | Komentářů: 0
    15.5. 21:33 | Nová verze

    Programovací jazyk Rust (Wikipedie) dnes slaví 10 let od vydání verze 1.0. Přímo na oslavě byla vydána nová verze 1.87.0. Podrobnosti v poznámkách k vydání. Vyzkoušet Rust lze například na stránce Rust by Example.

    Ladislav Hagara | Komentářů: 0
    15.5. 14:44 | IT novinky

    Evropská komise obvinila provozovatele čínské platformy TikTok z porušování pravidel EU kvůli netransparentnosti v reklamě. Komise, která v EU plní i funkci antimonopolního úřadu, to dnes uvedla v tiskové zprávě. TikTok, který patří čínské firmě ByteDance, se může k předběžnému nálezu vyjádřit. Pokud ale podezření komise nevyvrátí, hrozí mu pokuta až do šesti procent z ročního globálního obratu.

    Ladislav Hagara | Komentářů: 21
    14.5. 20:44 | Komunita

    Sovereign Tech Agency (Wikipedie), tj. agentura zabezpečující financování svobodného a otevřeného softwaru německou vládou, podpoří GFortran částkou 360 000 eur.

    Ladislav Hagara | Komentářů: 0
    14.5. 14:00 | IT novinky

    Microsoft hodlá zrušit zhruba tři procenta pracovních míst. Microsoft na konci loňského června zaměstnával kolem 228.000 lidí. Tři procenta z tohoto počtu představují téměř 7000 pracovních míst.

    Ladislav Hagara | Komentářů: 16
    14.5. 13:33 | IT novinky

    V říjnu loňského roku provedl Úřad pro ochranu hospodářské soutěže (ÚOHS) místní šetření u společnosti Seznam.cz. Krajský soud v Brně tento týden konstatoval, že toto šetření bylo nezákonné.

    Ladislav Hagara | Komentářů: 17
    Jaký filesystém primárně používáte?
     (57%)
     (1%)
     (7%)
     (23%)
     (4%)
     (2%)
     (2%)
     (1%)
     (0%)
     (3%)
    Celkem 642 hlasů
     Komentářů: 28, poslední dnes 10:19
    Rozcestník

    Dotaz: PERL oneliner v shell skriptu-predani parametrů

    6.6.2008 16:42 Terka | skóre: 13
    PERL oneliner v shell skriptu-predani parametrů
    Přečteno: 517×
    spoustim skript s parametry:
    ./skript.sh 222 33 '44 44' 55
    
    skript obsahuje:
    cat soubor|perl -e ' while (<>){if (/'$4'/../'$5'/){print;}}'
    
    
    protoze $4 obsahuje mezeru, skript mi nebezi korektne; za $4 se dosadi:
    cat soubor|perl -e ' while (<>){if (/44' '44/../55/){print;}}'
    
    jak mam upravit predchozi radek, aby mi tam doplnil:
    cat soubor|perl -e ' while (<>){if (/44 44/../55/){print;}}'
    

    Odpovědi

    David Watzke avatar 6.6.2008 16:45 David Watzke | skóre: 74 | blog: Blog... | Praha
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    ${4//\'}
    “Being honest may not get you a lot of friends but it’ll always get you the right ones” ―John Lennon
    6.6.2008 16:47 Terka | skóre: 13
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    diky, ale proc zrovna tohle ?
    David Watzke avatar 6.6.2008 16:49 David Watzke | skóre: 74 | blog: Blog... | Praha
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    Funguje to? // znamená nahrazení všech výskytů a jelikož tam už není další /, nahradí se řetězec za tím (escapovaný ') za nic. Příklad:
    echo ${PATH//:/ ... }
    “Being honest may not get you a lot of friends but it’ll always get you the right ones” ―John Lennon
    6.6.2008 16:51 Terka | skóre: 13
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    ne, nefunguje
    David Watzke avatar 6.6.2008 16:54 David Watzke | skóre: 74 | blog: Blog... | Praha
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    To protože sem špatně pochopil dotaz, místo apostrofů použij uvozovky.
    perl -e "while (<>){if (/$4/../$5/){print;}}" soubor
    V uvozovkách probíhá substituce...
    “Being honest may not get you a lot of friends but it’ll always get you the right ones” ―John Lennon
    6.6.2008 16:55 Terka | skóre: 13
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    diky!
    6.6.2008 18:02 Anatheman | skóre: 9 | Ostrava
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    mozna bych jen doplnil, ze ta smycka while se da nahradit -n. Viz. perlrun(1)

    perl -nle "(/$4/../$5/) && print;" soubor
    6.6.2008 21:40 pht | skóre: 48 | blog: pht
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    pokud mozno nezbavoval bych se tech apostrofu.
    cat soubor|perl -e ' while (<>){if (/'"$4"'/../'"$5"'/){print;}}'
    In Ada the typical infinite loop would normally be terminated by detonation.
    6.6.2008 22:18 Michal Marek (twofish) | skóre: 55 | blog: { display: blog; } | Praha
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    Jedna možnost je ty parametry předat jako proměnné prostředí a v perlu k nim přistupovat přes %ENV:
    param1="$4" param2="$5" perl -e '... $ENV{"param1}  $ENV{"param2"} '
    7.6.2008 12:56 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    cat soubor|perl -e ' while (<>){if (/$ARGV[1]/o .. /$ARGV[2]/o){print;}}' "$4" "$5"
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    7.6.2008 13:02 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: PERL oneliner v shell skriptu-predani parametrů
    teda ještě lépe jak už tu někdo napsal
    perl -ne '/$ARGV[1]/o .. /$ARGV[2]/o and print' "$4" "$5" < soubor
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.

    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.