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 23:33 | Zajímavý software

Byl vydán ShellCheck ve verzi 0.4.6. Jedná se o nástroj pro statickou analýzu shellových skriptů. Shellové skripty lze analyzovat na webové stránce ShellChecku, v terminálu nebo přímo z textových editorů. Příklady kódů, na které analýza upozorňuje a doporučuje je přepsat. ShellCheck je naprogramován v programovacím jazyce Haskell. Zdrojové kódy jsou k dispozici na GitHubu pod licencí GPLv3.

Ladislav Hagara | Komentářů: 0
včera 23:33 | Pozvánky

Czech JBoss User Group zve na setkání JBUG v Brně, které se koná ve středu 5. dubna 2017 v prostorách Fakulty informatiky Masarykovy univerzity v místnosti A318 od 18:00. Přednáší Pavol Loffay na téma Distributed Tracing and OpenTracing in Microservice Architecture.

… více »
mjedlick | Komentářů: 0
včera 11:33 | Zajímavý článek

Národní centrum kybernetické bezpečnosti (NCKB) vypracovalo (pdf) 26 podrobných bezpečnostních doporučení pro síťové správce. Tato doporučení jsou nastavena tak, aby je bylo možné aplikovat v každé instituci. Jsou rozdělena na tři základní části: bezpečnost infrastruktury, bezpečnost stanic a serverů a bezpečnost uživatelů.

Ladislav Hagara | Komentářů: 9
včera 05:55 | Komunita

Prezident Nadace pro svobodný software (FSF) Richard M. Stallman vyhlásil na slavnostním ceremoniálu v rámci konference LibrePlanet 2017 vítěze Free Software Awards za rok 2016. Ocenění za společenský přínos získal SecureDrop (Wikipedie). Za rozvoj svobodného softwaru byl oceněn Alexandre Oliva (Wikipedie).

Ladislav Hagara | Komentářů: 0
včera 04:44 | Nová verze

Byla vydána verze 0.7.0 debugovacího nástroje cgdb. Mezi novinky patří například zvýrazňování syntaxe jazyka Rust. Podrobnosti v poznámkách o vydání.

Neel | Komentářů: 0
25.3. 22:00 | Komunita

Portál Stack Overflow po roce opět vyzpovídal své uživatele, jedná se především o vývojáře softwaru, a zveřejnil (podcast) detailní výsledky průzkumu. Průzkumu se letos zúčastnilo více než 64 tisíc vývojářů. Jejich nejmilovanější platformou je linuxový desktop. Ten je také druhou nejpoužívanější platformou vývojářů.

Ladislav Hagara | Komentářů: 7
24.3. 11:55 | Komunita

Vývojový tým OpenSSL ve spolupráci s iniciativou Core Infrastructure konsorcia Linux Foundation spustil proces přelicencování této kryptografické knihovny ze současné licence na licenci Apache Licence v 2.0 (ASLv2). Nová licence usnadní začleňování OpenSSL do dalších svobodných a open source projektů. Všichni dosavadní vývojáři OpenSSL (Authors) obdrží v následujících dnech email s prosbou o souhlas se změnou licence.

Ladislav Hagara | Komentářů: 32
24.3. 01:11 | Komunita

Před třemi týdny Mozilla.cz představila projekt Photon, jehož cílem je návrh a implementace nového vzhledu Firefoxu. Včera zveřejnila první náhled vzhledu Photon. Práce na projektu Photon jsou rozděleny do pěti týmů, které celkem čítají 19 lidí. Zaměřují se na zlepšení prvního spuštění Firefoxu a zaujetí nových uživatelů, celkovou úpravu vzhledu, zlepšení animací, zrychlení odezvy uživatelského rozhraní a také upravení nabídek. Vývoj lze sledovat v Bugzille.

Ladislav Hagara | Komentářů: 50
23.3. 20:00 | Komunita

OneDrive pro firmy je již ve webových prohlížečích na Linuxu stejně rychlý jako na Windows. Microsoft opravil chybu z listopadu loňského roku. OneDrive pro firmy běžel na Linuxu mnohem pomaleji než na Windows. V popisu chyby bylo uvedeno, že stačilo v prohlížeči na Linuxu nastavit v user-agentu Windows a vše se zrychlilo. Odpovědí Microsoftu bylo (Internet Archive: Wayback Machine), že Linux není podporován. Po bouřlivých diskusích na redditu i Hacker News byla chyba nalezena a opravena.

Ladislav Hagara | Komentářů: 9
23.3. 19:00 | Zajímavý projekt

Byla vyhlášena soutěž Hackaday Prize 2017. Soutěž je určena vývojářům open source hardwaru. Pro výherce je připraveno celkově 250 tisíc dolarů. Každý ze 120 finalistů získá tisíc dolarů. Nejlepší pak navíc 50, 30, 20, 15, 10 a 5 tisíc dolarů. Jedná se již o čtvrtý ročník soutěže. V roce 2014 zvítězil projekt globální sítě open source pozemních satelitních stanic SatNOGS. V roce 2015 zvítězil open source systém pro řízení elektrických invalidních vozíků pohybem očí Eyedriveomatic. V roce 2016 zvítězil modulární robot Dtto.

Ladislav Hagara | Komentářů: 0
Jak se stavíte k trendu ztenčování přenosných zařízení (smartphony, notebooky)?
 (14%)
 (2%)
 (71%)
 (3%)
 (10%)
Celkem 947 hlasů
 Komentářů: 72, poslední 1.3. 11:16
    Rozcestník

    Dotaz: STDOUT -> PIPE -> PERL

    2.12.2010 14:52 xsustek | skóre: 6
    STDOUT -> PIPE -> PERL
    Přečteno: 373×
    Ahojte,

    potrebujem v v perlovskom skripte citat data hned ako mi ich externy program vypise na stdout. Problem je v tom, ze program ich vypisuje (ak ho spustim samostatne), ale skript nespracovava. Zostavaju asi niekde nabufrovane a neviem ako to vypnut. Toto je kod
    #!/usr/bin/perl
    open (IN,'monbro -N out.txt |' ) or die "Error";
    while ($line = {IN}) {
      print $line;
    }
    close IN;
    
    pokial sa jedna o vypnutie buffrovania v perle $|++; tak to som skusal a nic.

    Řešení dotazu:


    Odpovědi

    Řešení 1× (maleprase)
    Tarmaq avatar 2.12.2010 16:06 Tarmaq | skóre: 39
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    cus, v Perlu moc neumim, ale zkousel jsem si to schvalne napsat, tak treba ti to problem vyresi:
    #!/usr/bin/perl
    open ($in,'ls |' ) or die "Error";
    while (<$in>}) {
      print $_;
    }
    close $in;
    
    Don't panic!
    2.12.2010 18:38 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Toto ti funguje preto, lebo do pipe sa nacita cely vstup z ls. Moj problem je v tom, ze vystup mojho program v podstate nekonci, a ja potrebujem nacitat kazdy riadok v okamihu ked je vygenerovany.
    Řešení 1× (maleprase)
    2.12.2010 20:11 maleprase | skóre: 28
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    while ($line = {IN}) nema to byt <IN> ?

    tohle rozhodne funguje:
    open IN, 'bash -c "while true; do date; sleep 5; done" |'; 
    while ($line = <IN>) { 
      print $line; 
    }
    
    2.12.2010 20:22 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Ano toto funguje preto, pretoze ten date ti zakazdim skonci a do pipe vleze EOF. Skus tam dat nejkay program ktoreho vystup nekocni. Napr. tail -f nejakylog.txt
    2.12.2010 21:10 petr_p | skóre: 59 | blog: pb
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL

    Ale blbost. Žádný opakovaný EOF tam není, protože jednou zavřený deskriptor by se už zázračně neotevřel.

    Problém je s bufferováním mezi znaky nový řádek. To se dá vypnout přes autoflush(IN, 1). Jenže to se vztahuje na zápisovou rouru. My potřebujem vypnout bufferování ze čtecí roury, aby <> nečekal na nový řádek nebo EOF.

    2.12.2010 21:15 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Asi mas pravdu. Mas nejaky napad ako to vypnut? Nieje tento buffer este v bash/?
    2.12.2010 21:25 petr_p | skóre: 59 | blog: pb
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL

    Problém je v <&g;, což je převlečený IO::Handle->getline, který čeká na nový řádek.

    Tohle funguje:

    #!/usr/bin/perl
    use strict;
    use warnings;
    use IO::Handle;
    
    open (DATA, 'sh -c "printf 1; sleep 1; printf 2;" |') or die $!;
    STDOUT->autoflush;
    
    while (my $char = DATA->getc) {
        print $char;
    }
    
    close(DATA);
    
    2.12.2010 21:30 petr_p | skóre: 59 | blog: pb
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Samozřejmě čtení po znaku není efektivní. Vyšího výkonu lze dosáhnout přes funkci IO::Handle->read(BUFFER, LENGTH). Jen třeba si dobře zvolit velikost bufferu.
    2.12.2010 23:14 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Nerozumiem preco ale nejde mi to: toto moj kod #!/usr/bin/perl use warnings; use IO::Handle;

    open (IN, 'monbro -N chgen_test |' ) or die "Error"; STDOUT -> autoflush(1); while ($line = <IN>) { print $line; } close IN;

    mohol by si mi este poradit ako nastavit veliskot toho buffera? Niekde som nasiel ze setbuff sa nepouziva od verzie 5.8.0. A neviem ako pracovat s io handlerom, ked vlastne neotvaram subor ale pipe.
    3.12.2010 08:36 petr_p | skóre: 59 | blog: pb
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL

    Protože opět čtete po celých řádcích a ne po menších kusech (getc, ne <>). Ale jak už vám vysvětlili níže, chybu máte i na straně monbra.

    Velikost bufferu je argument funkce read. Souhrn je v manuálu k IO::Handle, podrobnější popis, tipuji, v perlfunc.

    2.12.2010 17:15 tyctor
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    daj si $| = 1;

    na zaciatok skriptu...
    2.12.2010 18:39 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Toto som skusal, nefunguje.
    2.12.2010 20:39 Marek
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    V clanku na linuxsoftu se pise cosi o IO::Handle a nastaveni autoflush. to by moh byt ten zadrhel
    2.12.2010 23:55 pht | skóre: 48 | blog: pht
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Problém není u vás ale v té aplikaci (monbro). Pokud se ta aplikace rozhodne, že pošle data až za hodinu, tak s tím na straně příjemce dat neuděláte nic. $| funguje jen na data co produkujete vy.

    Naštěstí je ale tenhle problém ve většině případů jednoduše řešitelný. Defaultní buffering je 4k textu pro neinteraktivní komunikaci (pipe) a 1 řádek pro interaktivní (terminál). Některé programy umí vynutit bufferování 1 řádek i pro pipe (např. sed -u). Pokud to monbro neumí tak mu potřebujete vnutit představu že se baví s terminálem. To se dělá pomocí pseudo terminálu, např. modulem IPC::Run.
    In Ada the typical infinite loop would normally be terminated by detonation.
    3.12.2010 00:16 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Ten skrip robim na stroji, ktory nema modul IPC::Run nainstalovany. Neviem ci by sa mi podarilo adminov presvedcit o update len kvoli tomuto skriptu. Nedalo by sa tomu monbro vnutit tuto predstavu nejako inak. napr. nejaky inym externym programom?
    3.12.2010 07:53 pht | skóre: 48 | blog: pht
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    možností je spousta
    1. nainstalovat si to do svého adresáře
    2. překopírovat (ten podstatný) kód do svého skriptu
    3. použít libovolnou jinou metodu jak otevřít pseudo terminál (na google se něco najde, je to jen o otevření /dev/ptmx a pár operací navíc)
    In Ada the typical infinite loop would normally be terminated by detonation.
    6.12.2010 01:41 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Mohli by ste mi prosim blizsie popisat tie moznosti?

    1. Nainstalovat modul IPC:Run? 2. Aky kod? Ten z toho modulu? 3. Neviete nahodou ako sa vytvara pseudo terminal nejaky prikazom v bash?
    3.12.2010 08:42 petr_p | skóre: 59 | blog: pb
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Zkuste jej spustit přes nástroj stdbuf z balíku coreutils, ale výsledek není zaručen. Lepší by bylo upravit kód toho monbra.
    6.12.2010 01:43 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Ja ten kod toho monbra nemozem upravit, lebo to je binarka. Je to sucast planovaca Autosys Job management. Skusal som aj to citanie po znaku, ale ako ste hovorili, tak buffruje to ten monbro.
    3.12.2010 00:21 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: STDOUT -> PIPE -> PERL
    Len chcem potvrdit, ze je to naozaj tak. Ked dam monbro -N mon_definition | cat. Tak zacne vypisovat az pri plnom buffery (4k). Takze v tom skripte to nieje.

    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.