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

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

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

    Dotaz: perl a open

    3.8.2005 12:56 lojza
    perl a open
    Přečteno: 127×
    ahoj, prosim vas nevit od ktere verze lze pouzit v perlu konstrukci: #!/usr/bin/perl -w

    open(OVL,"ps efh | cut -d ' ' -f 1 |"); while($radka=<>){ print $radka; }

    u while je samo v <> OVL, ale nejde to vlozit do diskuse

    diky

    Odpovědi

    3.8.2005 14:02 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a open
    nejméně od 5.6.0 ale asi ještě starší. Jinak do <> jde napsat cokoli. Stačí napsat
    <pre>open(OVL,"ps efh | cut -d ' ' -f 1 |"); while($radka=&lt;OVL&gt;){ print $radka; }</pre>
    a dostaneš
    open(OVL,"ps efh | cut -d ' ' -f 1 |"); while($radka=<OVL>){ print $radka; }
    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é.
    3.8.2005 16:29 Perlik :-D
    Rozbalit Rozbalit vše Re: perl a open
    #!/usr/bin/perl -w

    open(OVL,"ps aux|awk '\$1 ~ /bscsp/ && \$12 ~ /event_demon/ {print \$1\" \"\$12}'|"); while(<>){ print; }

    potreboval sem neco jako toto :-)
    3.8.2005 17:41 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a open
     #!/usr/bin/perl -w
    
    open(OVL,"ps aux|");
    while(<OVL>) {
      @a = split / +/;
      $a[0] =~ /bscsp/ and $a[11] =~ /event_demon/ and print "@a[0,11]"
    }
    Abych pravdu řek, nevím jistě co ta awk část má dělat, ale přijde mi přinejmenším zbytečné tvořit ještě jeden proces navíc. Malý hint pro příště, pokud se chceš zbavit problémů s apostrofy v perlu tak je tu bezva vychytávka q a qq.
    #!/usr/bin/perl -w
    open(OVL,q(ps aux|awk '$1 ~ /bscsp/ && $12 ~ /event_demon/ {print $1" "$12}'|));
    while(<OVL>){ print; }
    nebo
    #!/usr/bin/perl -w
    open(OVL,qq(ps aux|awk '\$1 ~ /bscsp/ && \$12 ~ /event_demon/ {print \$1" "\$12}'|));
    while(<OVL>){ print; }
    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.