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:25 | IT novinky

Do prodeje (Farnell) se dostal jednodeskový počítač Tinker Board (unboxing). Jedná se o konkurenci Raspberry Pi 3 od společnosti Asus. Porovnání (jpg) těchto počítačů například na CNXSoft. Cena Tinker Boardu je 55 £.

Ladislav Hagara | Komentářů: 0
dnes 14:44 | Zajímavý projekt

Byla zveřejněna pravidla hackerské soutěže Pwn2Own 2017, jež proběhne od 15. do 17. března v rámci bezpečnostní konference CanSecWes ve Vancouveru. Soutěžit se bude o více než milion dolarů v pěti kategoriích. Letos se bude útočit i na Ubuntu. Jedná se již o 10. ročník této soutěže.

Ladislav Hagara | Komentářů: 1
dnes 13:33 | Nová verze

Po sedmi měsících vývoje od vydání verze 5.7 byla vydána verze 5.8 (YouTube) toolkitu Qt. Z novinek lze zmínit například Qt Lite pro vestavěná zařízení. Nově jsou plně podporovány moduly Qt Wayland Compositor (YouTube) a Qt SCXML (YouTube). Současně byla vydána verze 4.2.1 integrovaného vývojového prostředí (IDE) Qt Creator.

Ladislav Hagara | Komentářů: 0
dnes 11:52 | Pozvánky

Lednový Prague Containers Meetup se koná ve čtvrtek 26. ledna 2017 od 18:00 v Apiary, Pernerova 49, Praha 8. Přijďte se podívat na přednášky o Enterprise Kubernetes a Jenkins as a code.

little-drunk-jesus | Komentářů: 0
dnes 11:40 | Pozvánky

Program letošního ročníku konference Prague PostgreSQL Developer Days, která se koná již 15. a 16. února 2017 na ČVUT FIT, Thákurova 9, Praha 6, byl dnes zveřejněn. Najdete ho na stránkách konference včetně anotací přednášek a školení. Registrace na konferenci bude otevřena zítra (24. ledna) v brzkých odpoledních hodinách.

TomasVondra | Komentářů: 0
včera 02:20 | Zajímavý článek

David Revoy, autor open source webového komiksu Pepper&Carrot nebo portrétu GNU/Linuxu, upozorňuje na svém blogu, že nový Inkscape 0.92 rozbíjí dokumenty vytvořené v předchozích verzích Inkscape. Problém by měl být vyřešen v Inkscape 0.92.2 [reddit].

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

Øyvind Kolås, hlavní vývojář grafických knihoven GEGL a babl, které využívá grafický program GIMP, žádá o podporu na Patreonu. Díky ní bude moci pracovat na vývoji na plný úvazek. Milník 1000 $, který by stačil na holé přežití, se již téměř podařilo vybrat, dalším cílem je dosažení 2500 $, které mu umožní běžně fungovat ve společnosti.

xkomczax | Komentářů: 12
21.1. 23:54 | Pozvánky

DevConf.cz 2017, již devátý ročník jedné z největších akcí zaměřených na Linux a open source ve střední Evropě, proběhne od pátku 27. ledna do neděle 29. ledna v prostorách Fakulty informačních technologií Vysokého učení technického v Brně. Na programu je celá řada zajímavých přednášek a workshopů. Letos je povinná registrace.

Ladislav Hagara | Komentářů: 0
21.1. 22:11 | Nová verze

Byla vydána verze 1.0.0 emulátoru terminálu Terminology postaveného nad EFL (Enlightenment Foundation Libraries). Přehled novinek v poznámkách k vydání.

Ladislav Hagara | Komentářů: 0
20.1. 17:00 | Nová verze

Byl vydán Docker 1.13. Přehled novinek na YouTube a v poznámkách k vydání na GitHubu. Docker umožňuje běh aplikací v softwarových kontejnerech (Wikipedia).

Ladislav Hagara | Komentářů: 7
Jak se stavíte k trendu ztenčování přenosných zařízení (smartphony, notebooky)?
 (11%)
 (2%)
 (73%)
 (3%)
 (10%)
Celkem 377 hlasů
 Komentářů: 29, poslední dnes 18:00
Rozcestník
Reklama
Š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: 238×
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: 37 | 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: 37 | 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.