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 21:33 | Nová verze Ladislav Hagara | Komentářů: 0
    26.4. 23:00 | Komunita

    V Tiraně proběhl letošní Linux App Summit (LAS) (Mastodon). Zatím nesestříhané videozáznamy přednášek jsou k dispozici na YouTube.

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

    Na čem aktuálně pracují vývojáři GNOME a KDE Plasma? Pravidelný přehled novinek v Týden v GNOME a Týden v KDE Plasma.

    Ladislav Hagara | Komentářů: 0
    26.4. 15:22 | Zajímavý projekt

    Berkeley Humanoid Lite (Onshape, GitHub) je open source humanoidní robot. V amerických cenách jej lze sestavit do 5000 dolarů.

    Ladislav Hagara | Komentářů: 11
    25.4. 18:44 | Nová verze

    Jakub Jelínek oznámil vydání verze 15.1 (15.1.0) kolekce kompilátorů pro různé programovací jazyky GCC (GNU Compiler Collection). Jedná se o první stabilní verzi řady 15. Přehled změn, nových vlastností a oprav a aktualizovaná dokumentace na stránkách projektu. Některé zdrojové kódy, které bylo možné přeložit s předchozími verzemi GCC, bude nutné upravit.

    Ladislav Hagara | Komentářů: 2
    25.4. 03:55 | Komunita

    Byly vyhlášeny výsledky letošní volby vedoucího projektu Debian (DPL, Wikipedie). Staronovým vedoucím zůstává Andreas Tille.

    Ladislav Hagara | Komentářů: 29
    24.4. 16:55 | IT novinky

    Jason Citron končí jako CEO Discordu. Od pondělí 28. dubna nastupuje nový CEO Humam Sakhnini, bývalý CSO Activision Blizzard.

    Ladislav Hagara | Komentářů: 5
    24.4. 14:22 | Nasazení Linuxu

    Článek na Libre Arts představuje baskytarový multiefekt Anagram od společnosti Darkglass Electronics. S Linuxem uvnitř (licence, GitHub).

    Ladislav Hagara | Komentářů: 1
    24.4. 10:22 | IT novinky

    Městský soud v Praze vyhlásil rozsudek, který vyhověl žalobě novináře Jana Cibulky, který s podporou spolku IuRe (Iuridicum Remedium) požadoval omluvu od státu za to, že česká legislativa nařizuje operátorům uchovávat metadata o elektronické komunikaci. To je přitom v rozporu s právem. Stát se musí novináři omluvit a zaplatit náklady řízení. Především je ale součástí přelomové rozhodnutí o nelegálnosti shromažďování dat a o

    … více »
    Ladislav Hagara | Komentářů: 7
    24.4. 08:22 | IT novinky

    Americké technologické firmy Apple a Meta Platforms porušily pravidla na ochranu unijního trhu, uvedla včera Evropská komise (EK). Firmám proto vyměřila pokutu – Applu 500 milionů eur (12,5 miliardy Kč) a Metě 200 milionů eur (pět miliard Kč). Komise to oznámila v tiskové zprávě. Jde o první pokuty, které souvisejí s unijním nařízením o digitálních trzích (DMA). „Evropská komise zjistila, že Apple porušil povinnost vyplývající z nařízení

    … více »
    Ladislav Hagara | Komentářů: 45
    Jaký filesystém primárně používáte?
     (59%)
     (1%)
     (9%)
     (21%)
     (4%)
     (1%)
     (2%)
     (0%)
     (1%)
     (2%)
    Celkem 466 hlasů
     Komentářů: 18, poslední 17.4. 12:41
    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: 516×
    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.