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

    Byla vydána (𝕏) srpnová aktualizace aneb nová verze 1.104 editoru zdrojových kódů Visual Studio Code (Wikipedie). Přehled novinek i s náhledy a videi v poznámkách k vydání. Ve verzi 1.104 vyjde také VSCodium, tj. komunitní sestavení Visual Studia Code bez telemetrie a licenčních podmínek Microsoftu.

    Ladislav Hagara | Komentářů: 0
    dnes 15:33 | IT novinky

    Spotify spustilo přehrávání v bezztrátové kvalitě. V předplatném Spotify Premium.

    Ladislav Hagara | Komentářů: 0
    dnes 15:00 | IT novinky

    Spoluzakladatel a předseda správní rady americké softwarové společnosti Oracle Larry Ellison vystřídal spoluzakladatele automobilky Tesla a dalších firem Elona Muska na postu nejbohatšího člověka světa. Hodnota Ellisonova majetku díky dnešnímu prudkému posílení ceny akcií Oraclu odpoledne vykazovala nárůst o více než 100 miliard dolarů a dosáhla 393 miliard USD (zhruba 8,2 bilionu Kč). Hodnota Muskova majetku činila zhruba 385 miliard dolarů.

    Ladislav Hagara | Komentářů: 0
    včera 21:22 | Nová verze

    Bylo vydáno Eclipse IDE 2025-09 aneb Eclipse 4.37. Představení novinek tohoto integrovaného vývojového prostředí také na YouTube.

    Ladislav Hagara | Komentářů: 0
    včera 18:22 | IT novinky

    T-Mobile od 15. září zpřístupňuje RCS (Rich Communication Services) zprávy i pro iPhone.

    Ladislav Hagara | Komentářů: 3
    včera 13:22 | IT novinky

    Společnost ARM představila platformu Arm Lumex s Arm C1 CPU Cluster a Arm Mali G1-Ultra GPU pro vlajkové chytré telefony a počítače nové generace.

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

    Unicode Consortium, nezisková organizace koordinující rozvoj standardu Unicode, oznámila vydání Unicode 17.0. Přidáno bylo 4 803 nových znaků. Celkově jich je 159 801. Přibylo 7 nových Emoji.

    Ladislav Hagara | Komentářů: 0
    9.9. 21:00 | IT novinky Ladislav Hagara | Komentářů: 17
    9.9. 18:33 | Nová verze

    Realtimová strategie Warzone 2100 (Wikipedie) byla vydána ve verzi 4.6.0. Podrobný přehled novinek, změn a oprav v ChangeLogu na GitHubu. Nejnovější verzi Warzone 2100 lze již instalovat také ze Snapcraftu a Flathubu.

    Ladislav Hagara | Komentářů: 1
    9.9. 12:22 | IT novinky

    Polské vývojářské studio CD Projekt Red publikovalo na Printables.com 3D modely z počítačové hry Cyberpunk 2077.

    Ladislav Hagara | Komentářů: 1
    Pro otevření více webových stránek ve webovém prohlížečí používám
     (83%)
     (7%)
     (2%)
     (2%)
     (4%)
     (2%)
    Celkem 164 hlasů
     Komentářů: 12, poslední včera 13:00
    Rozcestník

    Dotaz: perl RE 2 dotazy

    1.8.2014 13:20 Terka | skóre: 13
    perl RE 2 dotazy
    Přečteno: 1322×
    v cyklu zpracovavam jednotlive radky a potrebuju preskocit radky ktere nevyhovuji RE (respektive nechat ktere vyhovuji)
    
    ..
    ..
    next if /RE/;      #toto mi chodi
    $line =~ s:A:a:g;  #toto pouzivam bezne a rada bych znala zda nasledujici radek:
    $line =~ m/RE/;    #(ktery mi nechodi protoze to je jen podminka) lze zapsat nejak syntakticky podobne jako predchozi radek?
    #Poradite pripadne prosim dalsi moznosti zapisu napr pomoci prikazu grep?
    #jde mi o pochopeni a snadnou citelnost
    
    
    
    diky T.

    Odpovědi

    wamba avatar 1.8.2014 15:22 wamba | skóre: 38 | blog: wamba
    Rozbalit Rozbalit vše Re: perl RE 2 dotazy
    co by to mělo dělat? dát regulární výraz do proměnné, pak $line=qr{RE};
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    5.8.2014 15:33 Terka | skóre: 13
    Rozbalit Rozbalit vše Re: perl RE 2 dotazy
    ma to delat to co grep - vyfiltrovat radky co vyhovuji RE
    wamba avatar 5.8.2014 17:54 wamba | skóre: 38 | blog: wamba
    Rozbalit Rozbalit vše Re: perl RE 2 dotazy
    tak pomocí grepu to jde takhle:
    #!/usr/bin/perl
    use 5.010;
    use strict;
    use warnings;
    
    our $VERSION = 0.001;
    my @lines = <DATA>;
    
    my @lines_with_re = grep { m/ RE /xms } @lines;
    say @lines_with_re;
    
    __DATA__
    prvni radek
    druhy RE radek
    treti radek
    ctvrty rádek RE
    
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    7.8.2014 18:56 luky
    Rozbalit Rozbalit vše Re: perl RE 2 dotazy
    foreach (grep {/RE/} <>) {
        print;
    }
    
    pripadne radky nevyhovujici:
    foreach (grep {!/RE/} <>) {
        print;
    }
    
    4.8.2014 22:51 Michal Vránek | skóre: 3
    Rozbalit Rozbalit vše Re: perl RE 2 dotazy
    Tvuj dotaz je hodne zmateny, ale asi potrebujes toto...
    while (<->) {
      next if(m/RE/); # preskoci radky, ktere vyhovuji RE 
      # TODO: dalsi zpracovani
    }
    
    7.8.2014 20:36 Kooala
    Rozbalit Rozbalit vše Re: perl RE 2 dotazy
    Zkusil jsem se na to podivat z jineho uhlu nez ostatni, nechtelas
    next if m:RE: ;
    popripade
    next if $line =~ m:RE: ;
    ?

    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.