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 03:00 | Komunita

Na Humble Bundle lze získat počítačovou hru Company of Heroes 2 (Wikipedie, YouTube) běžící také v Linuxu zdarma. Speciální akce končí v sobotu v 19:00.

Ladislav Hagara | Komentářů: 0
dnes 02:00 | Zajímavý software

Christian Kellner představil na svém blogu projekt Bolt řešící bezpečnost rozhraní Thunderbolt 3 na Linuxu. Pomocí příkazu boltctl nebo rozšíření GNOME Shellu lze komunikovat s démonem boltd a například zakázat neznámá zařízení a předejít tak útokům typu Thunderstrike nebo DMA.

Ladislav Hagara | Komentářů: 0
dnes 01:00 | Nová verze

Po půl roce vývoje od vydání verze 11.0 byla vydána verze 11.1 svobodného softwaru pro vytváření datových úložišť na síti FreeNAS (Wikipedie). Nejnovější FreeNAS je postaven na FreeBSD 11.1. Přehled novinek v příspěvku na blogu. Zdůraznit lze zvýšení výkonu OpenZFS, počáteční podporu Dockeru nebo synchronizaci s cloudovými službami Amazon S3 (Simple Storage Services), Backblaze B2 Cloud, Google Cloud a Microsoft Azure

Ladislav Hagara | Komentářů: 0
včera 23:55 | Nová verze

Po dvou měsících vývoje od vydání verze 235 oznámil Lennart Poettering vydání verze 236 správce systému a služeb systemd (GitHub, NEWS).

Ladislav Hagara | Komentářů: 0
včera 20:00 | Nová verze Ladislav Hagara | Komentářů: 0
včera 19:33 | Pozvánky

Pražská Fedora 27 Release Party, oslava nedávného vydání Fedory 27, se uskuteční 19. prosince od 19:00 v prostorách společnosti Etnetera (Jankovcova 1037/49). Na programu budou přednášky o novinkách, diskuse, neřízený networking atd.

Ladislav Hagara | Komentářů: 0
včera 18:11 | Nová verze

Byla vydána verze 2.11.0 QEMU (Wikipedie). Přispělo 165 vývojářů. Provedeno bylo více než 2 000 commitů. Přehled úprav a nových vlastností v seznamu změn.

Ladislav Hagara | Komentářů: 0
včera 17:44 | Komunita

Canonical oznámil dostupnost kryptografických balíčků s certifikací FIPS 140-2 úrovně 1 pro Ubuntu 16.04 LTS pro předplatitele podpory Ubuntu Advantage Advanced. Certifikace FIPS (Federal Information Processing Standards) jsou vyžadovány (nejenom) vládními institucemi USA.

Ladislav Hagara | Komentářů: 2
včera 16:11 | Zajímavý software

Společnost Avast uvolnila zdrojové kódy svého dekompilátoru RetDec (Retargetable Decompiler) založeného na LLVM. Vyzkoušet lze RetDec jako webovou službu nebo plugin pro interaktivní disassembler IDA. Zdrojové kódy RetDec jsou k dispozici na GitHubu pod open source licencí MIT.

Ladislav Hagara | Komentářů: 3
13.12. 11:00 | Zajímavý software
Na Good Old Games je v rámci aktuálních zimních slev zdarma k dispozici remasterovaná verze klasické point&click adventury Grim Fandango, a to bez DRM a pro mainstreamové OS včetně GNU/Linuxu. Akce trvá do 14. prosince, 15:00 SEČ.
Fluttershy, yay! | Komentářů: 6
Jak se vás potenciálně dotkne trend odstraňování analogového audio konektoru typu 3,5mm jack z „chytrých telefonů“?
 (8%)
 (1%)
 (1%)
 (1%)
 (75%)
 (14%)
Celkem 987 hlasů
 Komentářů: 45, poslední 1.12. 19:00
    Rozcestník

    Dotaz: perl - vzor při vyhledávání v html

    5.7.2013 10:53 qweerty | skóre: 1
    perl - vzor při vyhledávání v html
    Přečteno: 222×
    Potřeboval bych pomoc s vyhledáním všech vzorů v html.

    Zpracovávám html stránku kterou mám načtenou v proměnné $page
    my $html = HTML::Tree->new();
    $html->parse($page);
    while ($html){
    my ($id) = $html->look_down( 'id','o012' );
    print encode_utf8($id->as_HTML ), "\n";
    }
    
    Potřeboval bych pomoc s nahrazením
    o012
    za něco jako
    /o\d{3}/
    , aby mi při nalezení vzoru bylo toto id vypsáno.

    Řešení dotazu:


    Odpovědi

    5.7.2013 11:10 vbar
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    /o(\d{3})/ && print $1;
    wamba avatar 5.7.2013 13:55 wamba | skóre: 37 | blog: wamba
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    look_down podporuje notaci s reg. objektem tak, že něco jako $html->look_down( 'id',qr{o\d{3}} ), ale ten příklad je celý nějaký divný. Co přesně má dělat?
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    pavlix avatar 5.7.2013 13:58 pavlix | skóre: 54 | blog: pavlix
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    ale ten příklad je celý nějaký divný.
    Školní zadání?
    Já už tu vlastně ani nejsem. Abclinuxu umřelo.
    wamba avatar 5.7.2013 15:05 wamba | skóre: 37 | blog: wamba
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    Že by byli někde tak "osvíceni", že by zadávali úkoly v Perl-u?
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    5.7.2013 15:39 qweerty | skóre: 1
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    Dekuji, na toto jsem po zalozeni vlakna a cteni prisel.
    my ($id) = $tree->look_down( 'id',qr/o\d{3}/ );
    
    fungluje jak ma. Vypise prvni vyskyt podle reg.vyrazu.

    s Perlem zacinam uz tri mesice, chtel bych jeste v necem popostrcit

    jak mam toto vse zacyklovat tak aby mi to proslo pres celou stranku a vyhledalo vsechen vyskyt

    pomoci while mi to vypisuje jen prvni vyskyt hodnekrat zasebou
    while($tree){
    	my ($id) = $tree->look_down( 'id',qr/o\d{3}/ );
    	print encode_utf8($id->as_HTML) , "\n";
    }
    
    Řešení 1× (qweerty (tazatel))
    wamba avatar 5.7.2013 16:14 wamba | skóre: 37 | blog: wamba
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    my @id = $tree->look_down( 'id',qr{o\d{3}}xms );
    foreach (@id) {
        say $_->as_HTML;
    }
    
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    5.7.2013 16:54 qweerty | skóre: 1
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    Dekuji toto dela co potrebuji.

    mohl bych se zeptat proc tam pro uvozeni reg.vyrazu je {
    wamba avatar 5.7.2013 17:04 wamba | skóre: 37 | blog: wamba
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    protože to zápis umožňuje :) jen má preference s m,qr,s lze použít libovolný znak nebo závorky tedy lze psát např. m#a.*#; s[ahoj][cau]g atd. přičemž se doporučuje používat buď / / nebo { }
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    5.7.2013 17:10 qweerty | skóre: 1
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    Dalsi a posledni dotaz. Ta chyba co jsem mel v zapisu je ze jsem se neodkazoval na hash @ ale na promenou $ ?
    wamba avatar 5.7.2013 17:48 wamba | skóre: 37 | blog: wamba
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    s @ na začátku je pole(array) ty si tam měl ($id) což je list, s prvním prvkem $id tedy si dostal sice pole, ale při porovnání se vzal jen první prvek, což v tomto případě (a shodou okolností) je to stejné jako kdyby si tam napsal jen $id

    Podobně by si mohl ($id1,$id2) dostat první dva prvky.

    rozdíl mezi $id a ($id) lze vidět třeba tady
    my @array=('a','b');
    my $id = @array;
    my ($id)=@array;
    
    kdy v tom případě bude v $id počet prvků(2) a v tom druhém první prvek('a') jenom upozorňuji, že při zápisu my $id =('a','b') by byl v $id poslední prvek list tedy 'b'. :)

    navíc si tam měl while přes $tree, které se v té smyčce nemění tak záleží čeho si chtěl dosáhnout
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    5.7.2013 15:08 qweerty | skóre: 1
    Rozbalit Rozbalit vše Re: perl - vzor při vyhledávání v html
    no ne tak uplne presne, zadne skolni zadani, jen se snazim hrat si kdyz je ten svatek

    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.