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 20:22 | Zajímavý software

    Navigace se soukromím CoMaps postavena nad OpenStreetMap je nově k dispozici v Google Play, App Store i F-Droid. Jedná se o komunitní fork aplikace Organic Maps.

    Ladislav Hagara | Komentářů: 3
    4.7. 19:33 | Nová verze

    Vývojáři OpenMW (Wikipedie) oznámili vydání verze 0.49.0 této svobodné implementace enginu pro hru The Elder Scrolls III: Morrowind. Přehled novinek i s náhledy obrazovek v oznámení o vydání.

    Ladislav Hagara | Komentářů: 1
    4.7. 15:22 | IT novinky

    Masivní výpadek elektrického proudu zasáhl velkou část České republiky. Hasiči vyjížděli k většímu počtu lidí uvězněných ve výtazích. Výpadek se týkal zejména severozápadu republiky, dotkl se také Prahy, Středočeského nebo Královéhradeckého kraje. Ochromen byl provoz pražské MHD, linky metra se už podařilo obnovit. Výpadek proudu postihl osm rozvoden přenosové soustavy, pět z nich je nyní opět v provozu. Příčina problémů je však stále neznámá. Po 16. hodině zasedne Ústřední krizový štáb.

    Ladislav Hagara | Komentářů: 53
    4.7. 02:33 | Nová verze

    Po více než roce vývoje od vydání verze 5.40 byla vydána nová stabilní verze 5.42 programovacího jazyka Perl (Wikipedie). Do vývoje se zapojilo 64 vývojářů. Změněno bylo přibližně 280 tisíc řádků v 1 500 souborech. Přehled novinek a změn v podrobném seznamu.

    Ladislav Hagara | Komentářů: 7
    4.7. 01:33 | Nová verze

    Byla vydána nová stabilní verze 7.5 webového prohlížeče Vivaldi (Wikipedie). Postavena je na Chromiu 138. Přehled novinek i s náhledy v příspěvku na blogu.

    Ladislav Hagara | Komentářů: 0
    3.7. 16:33 | Zajímavý software

    Sniffnet je multiplatformní aplikace pro sledování internetového provozu. Ke stažení pro Windows, macOS i Linux. Jedná se o open source software. Zdrojové kódy v programovacím jazyce Rust jsou k dispozici na GitHubu. Vývoj je finančně podporován NLnet Foundation.

    Ladislav Hagara | Komentářů: 0
    3.7. 12:33 | Nová verze

    Byl vydán Debian Installer Trixie RC 2, tj. druhá RC verze instalátoru Debianu 13 s kódovým názvem Trixie.

    Ladislav Hagara | Komentářů: 0
    3.7. 03:33 | Komunita

    Na čem pracují vývojáři webového prohlížeče Ladybird (GitHub)? Byl publikován přehled vývoje za červen (YouTube).

    Ladislav Hagara | Komentářů: 0
    3.7. 02:33 | Nová verze

    Libreboot (Wikipedie) – svobodný firmware nahrazující proprietární BIOSy, distribuce Corebootu s pravidly pro proprietární bloby – byl vydán ve verzi 25.06 "Luminous Lemon". Přidána byla podpora desek Acer Q45T-AM a Dell Precision T1700 SFF a MT. Současně byl ve verzi 25.06 "Onerous Olive" vydán také Canoeboot, tj. fork Librebootu s ještě přísnějšími pravidly.

    Ladislav Hagara | Komentářů: 0
    3.7. 01:33 | Komunita

    Licence GNU GPLv3 o víkendu oslavila 18 let. Oficiálně vyšla 29. června 2007. Při té příležitosti Richard E. Fontana a Bradley M. Kuhn restartovali, oživili a znovu spustili projekt Copyleft-Next s cílem prodiskutovat a navrhnout novou licenci.

    Ladislav Hagara | Komentářů: 0
    Jaký je váš oblíbený skriptovací jazyk?
     (60%)
     (27%)
     (7%)
     (2%)
     (1%)
     (1%)
     (3%)
    Celkem 358 hlasů
     Komentářů: 16, poslední 8.6. 21:05
    Rozcestník
    Štítky: není přiřazen žádný štítek

    Dotaz: [Perl]-reg. výraz, ignorace znaků

    24.2.2012 19:10 Tomasko | skóre: 4
    [Perl]-reg. výraz, ignorace znaků
    Přečteno: 273×
    Ahojte. Snažím se o: mám proměnou $text="Ahoj ja jsem text." potřebuji zpracovat reg. výraz s/($text)/.../g; s tím, že chci ignorovat slovo "ja", které je v proměnné $text

    Jak zapíšu tento reg. výraz s ignorací slova "ja" v proměnné $text?

    Zkouším, zatím se nedaří. Děkuju

    Odpovědi

    24.2.2012 19:47 l4m4
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    Chceš

    (a) odstranit z řetězce "Ahoj ja jsem text." část "ja" a zbytek použít coby regulární výraz, nebo

    (b) zkonstruovat regulární výraz, kterému vyvohuje text Ahoj ja jsem text. s tím, že namísto ja tam může být cokoli

    ?

    25.2.2012 00:38 Tomasko | skóre: 4
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    snažím se o možnost b) mam otevrenou dobrou stranku na reg. vyrazy https://akela.mendelu.cz/~darena/Perl/regexp.html , ale zatím jsem to nevyřešil
    25.2.2012 00:51 l4m4
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    V tom případě dáš v místě ja regulární výraz odpovídající tomu, co všechno tam může být. Třeba:

    V místě ja může být libovolné množství textu:
    s/Ahoj .* jsem text\./.../
    nebo v místě ja může být jedno slovo
    s/Ahoj \S+ jsem text\./.../
    a pod.
    25.2.2012 13:05 Tomasko | skóre: 4
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    Tohle umím taky, ale já mám regulární výraz v proměnné $text. Pak s/($text)/.../g a potřebuji aby mi to např. to slovo "je" v regulárním výrazu ignorovalo.
    wamba avatar 25.2.2012 13:19 wamba | skóre: 38 | blog: wamba
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    stále nejde pochopit co vlastně chcete (alespoň pro mě).

    Ukažte příklad vstupu a jak by měl vypadat výstup, popř. váš kód a řekněte přesně kde je problém?
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    25.2.2012 14:14 Goheeca
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků

    On má na mysli něco na způsob:

    echo "ahoj lidi" | sed -e "s/`echo "lydi" | sed -e "s/y/i/g"`/opice/g"
    @Tomasko Takže si přečti něco o vnořenýh příkazech.

    // Jakékoliv připomínky jsou vítany, jelikož bash téměř nepoužívám a tohle jsem momentálně vyzkoušel dokonce v cygwinu.

    25.2.2012 17:08 kolcon | skóre: 15 | blog: kolcon
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    co mas teda v te promenne $text ?
    "Ahoj ja jsem text" nebo
    "ja" ?
    25.2.2012 18:28 Tomasko | skóre: 4
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    Vyjadřuji se dost nejasně. Uvedu příklad: Mám dvě proměnné v jedné mám text ve druhé reg. výraz viz:

    $text = "Dobry den damy a panove dneska je krasny pekny den.";

    $reg_vyraz = "damy panove"; #je to jen pro priklad, muze tam byt napr. [abc] nebo jakykoliv jiny reg. vyraz to je ted fuk

    $text =~ s/($reg_vyraz)/panove i damy/g;

    Jenomže tenhle reg. vyraz mi fungovat nebude(ani nemůže). Potřebuji do reg. výrazu nadefinovat aby:[ ][a] ignoroval. Tím pádem by reg. výraz zabral na "damy a panove", protože [ ][a] ignoruje. Zbyde "damy panove" a to uz dokaze vzit a nahradit cim potrebuji.

    Výsledek: print "$text \n"; vypíše tohle: Dobry den panove i damy dneska je krasny pekny den.

    ps. nejedna se o bash, ale o PERL
    25.2.2012 19:24 kolcon | skóre: 15 | blog: kolcon
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků

    co treba takto nejak:

    use strict;
    use warnings;
    use 5.012;

    my $text = 'Dobry den damy a panove dneska je krasny pekny den.';
    my $regex = 'damy a panove';
    my $new_text = 'panove a damy ';

    my $built_regex;

    for (split / /, $regex) {
    $built_regex.= $_.' [\sa]* ' unless ($_ ~~ /\s+/msxi) or ($_ ~~ /^a$/msxi);
    }

    $text =~ s/$built_regex/$new_text/msxi;
    say $text;

    25.2.2012 19:34 kolcon | skóre: 15 | blog: kolcon
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků

    pripadne variace na toto tema s upravou zravosti

    use strict;
    use warnings;
    use 5.012;

    my $text = 'Dobry den damy a panove dneska je krasny pekny den.';
    my $regex = 'damy a panove';
    my $new_text = 'panove a damy';

    my $built_regex;

    for (split / /, $regex) {
    $built_regex.= $_.' [\sa]*? ' unless ($_ ~~ /\s+/gmsxi) or ($_ ~~ /^a$/gmsxi);
    }

    $text =~ s/$built_regex/$new_text/msxi;
    say $text;

    25.2.2012 22:45 l4m4
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    To je řešitelné, ale musí se specifikovat, co může být v místě nic/a. Například, zda se má nahradit dámy ... pánové i v textu

    Dobrý den dámy. Jistě se divíte, proč tu nejsou žádní pánové.

    nebo jak. To jsi nikdy přesně nenapsal, ale na tom závisí, co do toho regulárního výrazu máš vložit.

    Pokud má pouze umožňovat spojku a v místě mezery, tak stačí udělat

    $reg_vyraz =~ s/ /( | a )/g;

    Má-li možňovat něco jiného, tak se musí upravit podle toho.
    wamba avatar 26.2.2012 01:06 wamba | skóre: 38 | blog: wamba
    Rozbalit Rozbalit vše Re: [Perl]-reg. výraz, ignorace znaků
    takže chcete něco takového?

    use 5.010;
    
    my $text = "Dobry den damy a panove dneska je krasny pekny den.";
    my $tohle_se_ma_ignorovat=qr{\s+a\s+|\s+};
    my $reg_vyraz = qr(\bdamy${tohle_se_ma_ignorovat}panove\b);
    
    $text =~ s/$reg_vyraz/panove i damy/g;
    
    say $text;
    
    This would have been so hard to fix when you don't know that there is in fact an easy fix.

    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.