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í
×

    včera 17:44 | Komunita

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

    Ladislav Hagara | Komentářů: 1
    1.12. 21:55 | Nová verze

    Organizace Apache Software Foundation (ASF) vydala verzi 20 integrovaného vývojového prostředí a vývojové platformy napsané v Javě NetBeans (Wikipedie). Přehled novinek na GitHubu. Instalovat lze také ze Snapcraftu a Flathubu.

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

    Desktopové prostředí Cinnamon, vyvíjené primárně pro distribuci Linux Mint, dospělo do verze 6.0. Seznam změn obsahuje především menší opravy a v říjnovém přehledu novinek v Mintu avizovanou experimentální podporu Waylandu.

    Fluttershy, yay! | Komentářů: 3
    1.12. 13:44 | Nová verze

    OpenZFS (Wikipedie), tj. implementace souborového systému ZFS pro Linux a FreeBSD, byl vydán ve verzích 2.2.2 a 2.1.14. Přináší důležitou opravu chyby vedoucí k možnému poškození dat.

    Ladislav Hagara | Komentářů: 0
    1.12. 12:00 | Bezpečnostní upozornění

    V ownCloudu byly nalezeny tři kritické zranitelnosti: CVE-2023-49103, CVE-2023-49104 a CVE-2023-49105 s CVSS 10.0, 8.7 a 9.8. Zranitelnost CVE-2023-49103 je právě využívána útočníky. Nextcloudu se zranitelnosti netýkají.

    Ladislav Hagara | Komentářů: 0
    1.12. 08:00 | IT novinky

    I letos vychází řada ajťáckých adventních kalendářů. Programátoři se mohou potrápit při řešení úloh z kalendáře Advent of Code 2023. Pro programátory v Perlu je určen Perl Advent Calendar 2023. Zájemci o UX mohou sledovat Lean UXmas 2023. Pro zájemce o kybernetickou bezpečnost je určen Advent of Cyber 2023

    Ladislav Hagara | Komentářů: 0
    1.12. 07:00 | Nová verze

    Byla vydána verze 2.12 svobodného video editoru Flowblade (GitHub, Wikipedie). Přehled novinek v poznámkách k vydání. Videoukázky funkcí Flowblade na Vimeu. Instalovat lze také z Flathubu.

    Ladislav Hagara | Komentářů: 0
    30.11. 21:11 | Nová verze

    Armbian, tj. linuxová distribuce založená na Debianu a Ubuntu optimalizovaná pro jednodeskové počítače na platformě ARM a RISC-V, ke stažení ale také pro Intel a AMD, byl vydán ve verzi 23.11 Topi. Přehled novinek v Changelogu.

    Ladislav Hagara | Komentářů: 0
    30.11. 16:22 | Nová verze

    Po 4 měsících vývoje byla vydána nová verze 4.2 multiplatformního open source herního enginu Godot (Wikipedie, GitHub). Přehled novinek i s náhledy v příspěvku na blogu a na YouTube.

    Ladislav Hagara | Komentářů: 0
    30.11. 16:11 | Nová verze

    Byla vydána nová stabilní verze 23.11 linuxové distribuce NixOS (Wikipedie). Její kódové označení je Tapir. Podrobný přehled novinek v poznámkách k vydání. O balíčky se v NixOS stará správce balíčků Nix.

    Ladislav Hagara | Komentářů: 0
     (38%)
     (19%)
     (42%)
    Celkem 26 hlasů
     Komentářů: 0
    Rozcestník

    Dotaz: Perl - open

    24.2.2013 21:34 Petr
    Perl - open
    Přečteno: 307×
    Dobrý den,

    rád bych vás poprosil o pomoc při programování v perlu. Mám následující příkaz: $adresar = "nazev_adresare" open(DATA, "find $adresar |") tento kod funguje a do DATA se ulozi vystup funkce "find"

    ale kdyz pridam: open(DATA, "find $adresar | grep reg_vyraz |")

    tak mi to nenajde nic. Regulární výraz je určitě správně, protože normalně v konzoli to funguje.

    Děkuji předem za každou radu.

    Odpovědi

    24.2.2013 22:40 ironman
    Rozbalit Rozbalit vše Re: Perl - open
    proc tak slozite (aspon pro me)? Chci spustit externi prikaz a ziskat z nej vystup pak pouziju prikaz system
    my $outputCmd = system("find $adresar | grep reg_vyraz");
    
    Mimo to cele je to slozite napsane:
    1/ find umi prez exec sam volat grep tim se zvysi prehlednost externiho commandu.
    2/ perl ma svoje regularni vyrazi = cistejsi reseni vlastnimi regex v kodu perlu, externe bych volal jen find pro ziskani seznamu souboru
    25.2.2013 09:30 Petr
    Rozbalit Rozbalit vše Re: Perl - open
    Dekuju za radu. Ještě otázka. Funkce system je ze standardních knihoven?
    25.2.2013 18:10 ironman
    Rozbalit Rozbalit vše Re: Perl - open
    Ano funkce system je "v zakladu" Jinak http://search.cpan.org/~dom/perl-5.12.5/pod/perlfunc.pod
    24.2.2013 22:45 Jan Šimák | skóre: 37 | Hradec Králové
    Rozbalit Rozbalit vše Re: Perl - open
    A co varianta:
    print `find $adresar | grep reg_vyraz`;
    
    Pokud bude fungovat, tak bych hledal příčinu v regulárním výrazu, respektive jeho pozměnění v perlu před vykonáním.
    24.2.2013 22:50 NN
    Rozbalit Rozbalit vše Re: Perl - open
    open(DATA,"find /etc | grep host|");
    
    Funguje, takze problem bude nekde jinde. Muzes uvest cely kod ?
    Brilantní modř avatar 26.2.2013 00:48 Brilantní modř | skóre: 14
    Rozbalit Rozbalit vše Re: Perl - open

    No fuj, takhle prasit v Perlu, to je teda hnus…

    A jedna filosofická: co k tomu proboha lidi vede?

    martin-ux avatar 26.2.2013 12:22 martin-ux | skóre: 18 | Bratislava
    Rozbalit Rozbalit vše Re: Perl - open
    Co tak pouzit Find::File:
    #!/usr/bin/perl
    
    use warnings;
    use strict;
    use File::Find;
    
    find (\&open_routine, "/etc/");
    
    sub open_routine {
            return 1 if (! /^hosts$/);
    
            print "DEBUG: got file: $_\n";
    
            open (HFD, '<' . $_) or die ("ERROR: unable to open $_, $!");
    
            print $_ foreach (<HFD>);
    
            close (HFD);
    }
    
    Hladata hosts v /etc. Ak najde, otvori a vypise jeho obsah.
    ..when you do things right, people won't be sure you've done anything at all..

    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.