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 14:00 | Zajímavý článek

    Byl publikován aktuální přehled vývoje renderovacího jádra webového prohlížeče Servo (Wikipedie).

    Ladislav Hagara | Komentářů: 0
    včera 12:00 | Nová verze

    V programovacím jazyce Go naprogramovaná webová aplikace pro spolupráci na zdrojových kódech pomocí gitu Forgejo byla vydána ve verzi 12.0 (Mastodon). Forgejo je fork Gitei.

    Ladislav Hagara | Komentářů: 0
    17.7. 18:44 | Zajímavý článek

    Nová čísla časopisů od nakladatelství Raspberry Pi zdarma ke čtení: Raspberry Pi Official Magazine 155 (pdf) a Hello World 27 (pdf).

    Ladislav Hagara | Komentářů: 1
    17.7. 16:11 | Nová verze

    Hyprland, tj. kompozitor pro Wayland zaměřený na dláždění okny a zároveň grafické efekty, byl vydán ve verzi 0.50.0. Podrobný přehled novinek na GitHubu.

    Ladislav Hagara | Komentářů: 2
    17.7. 15:55 | Komunita

    Patrick Volkerding oznámil před dvaatřiceti lety vydání Slackware Linuxu 1.00. Slackware Linux byl tenkrát k dispozici na 3,5 palcových disketách. Základní systém byl na 13 disketách. Kdo chtěl grafiku, potřeboval dalších 11 disket. Slackware Linux 1.00 byl postaven na Linuxu .99pl11 Alpha, libc 4.4.1, g++ 2.4.5 a XFree86 1.3.

    Ladislav Hagara | Komentářů: 5
    16.7. 21:22 | IT novinky

    Ministerstvo pro místní rozvoj (MMR) jako první orgán státní správy v Česku spustilo takzvaný „bug bounty“ program pro odhalování bezpečnostních rizik a zranitelných míst ve svých informačních systémech. Za nalezení kritické zranitelnosti nabízí veřejnosti odměnu 1000 eur, v případě vysoké závažnosti je to 500 eur. Program se inspiruje přístupy běžnými v komerčním sektoru nebo ve veřejné sféře v zahraničí.

    Ladislav Hagara | Komentářů: 19
    16.7. 16:22 | IT novinky

    Vláda dne 16. července 2025 schválila návrh nového jednotného vizuálního stylu státní správy. Vytvořilo jej na základě veřejné soutěže studio Najbrt. Náklady na přípravu návrhu a metodiky činily tři miliony korun. Modernizovaný dvouocasý lev vychází z malého státního znaku. Vizuální styl doprovází originální písmo Czechia Sans.

    Ladislav Hagara | Komentářů: 26
    16.7. 15:33 | Upozornění

    Vyhledávač DuckDuckGo je podle webu DownDetector od 2:15 SELČ nedostupný. Opět fungovat začal na několik minut zhruba v 15:15. Další služby nesouvisející přímo s vyhledáváním, jako mapyAI asistent jsou dostupné. Pro některé dotazy během výpadku stále funguje zobrazování například textu z Wikipedie.

    bindiff | Komentářů: 8
    16.7. 13:33 | Bezpečnostní upozornění

    Více než 600 aplikací postavených na PHP frameworku Laravel je zranitelných vůči vzdálenému spuštění libovolného kódu. Útočníci mohou zneužít veřejně uniklé konfigurační klíče APP_KEY (např. z GitHubu). Z více než 260 000 APP_KEY získaných z GitHubu bylo ověřeno, že přes 600 aplikací je zranitelných. Zhruba 63 % úniků pochází z .env souborů, které často obsahují i další citlivé údaje (např. přístupové údaje k databázím nebo cloudovým službám).

    Ladislav Hagara | Komentářů: 5
    16.7. 00:11 | Nová verze

    Open source modální textový editor Helix, inspirovaný editory Vim, Neovim či Kakoune, byl vydán ve verzi 25.07. Přehled novinek se záznamy terminálových sezení v asciinema v oznámení na webu. Detailně v CHANGELOGu na GitHubu.

    Ladislav Hagara | Komentářů: 0
    Jaký je váš oblíbený skriptovací jazyk?
     (59%)
     (27%)
     (7%)
     (3%)
     (0%)
     (1%)
     (4%)
    Celkem 410 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.