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 11:44 | IT novinky

Minulý týden na šampionátu The International 2017 byl představen bot, který poráží profesionální hráče počítačové hry Dota 2. V nejnovějším příspěvku na blogu se organizace OpenAI o projektu více rozepsala a zveřejnila videozáznamy několika soubojů.

Ladislav Hagara | Komentářů: 1
včera 17:11 | Komunita

Byly zveřejněny videozáznamy přednášek z Fedora 26 Release Party konané 10. srpna v Praze.

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

Přesně před čtyřiadvaceti lety, 16. srpna 1993, oznámil Ian Murdock vydání "Debian Linux Release".

Ladislav Hagara | Komentářů: 4
včera 06:00 | Bezpečnostní upozornění

Ve virtualizačním softwaru Xen bylo nalezeno a opraveno 5 bezpečnostních chyb XSA-226 až XSA-230. Nejzávažnější z nich XSA-227 (CVE-2017-12137) umožňuje eskalaci privilegií a ovládnutí celého systému, tj. správce hostovaného systému se může stát správcem hostitelského systému.

Ladislav Hagara | Komentářů: 1
15.8. 22:00 | Zajímavý projekt

V roce 2013 proběhla na Kickstarteru úspěšná kampaň na podporu otevřeného Dobře temperovaného klavíru (Well-Tempered Clavier). Stejný tým s Kimiko Išizaka spustil před týdnem na Kickstarteru kampaň Libre Art of the Fugue na podporu svobodného Umění fugy.

Ladislav Hagara | Komentářů: 2
15.8. 13:55 | Pozvánky

Spolek OpenAlt zve příznivce otevřených technologií a otevřeného přístupu na 143. brněnský sraz, který proběhne v pátek 18. srpna od 18:00 hodin ve sportovním areálu a restauraci BeachPub Sokolák u Brněnské přehrady aneb v hantecu u Prýglu.

Ladislav Hagara | Komentářů: 0
15.8. 10:55 | Nová verze

Byla vydána (pdf) verze 3 průběžně aktualizované (rolling release) linuxové distribuce Solus (Wikipedie). Ke stažení je v edicích Budgie, GNOME a MATE. Z novinek lze zmínit například podporu snapů. Solus 3 obsahuje Firefox 55.0.1, LibreOffice 5.4.0.3, Rhythmbox 3.4.1 nebo Thunderbird 52.2.1. Edice Budgie a GNOME přichází s GNOME MPV 0.12. Edice MATE s VLC 2.2.6.

Ladislav Hagara | Komentářů: 5
14.8. 21:44 | Nová verze

Po více než roce vývoje od vydání verze 1.0 Microsoft oznámil vydání verze 2.0 platformy .NET Core (GitHub). Přehled novinek v poznámkách k vydání a ve videu na Channel 9.

Ladislav Hagara | Komentářů: 0
14.8. 21:11 | Pozvánky

Před dvaceti lety, 15. srpna 1997, poslal Miguel de Icaza do diskusního listu GTK+ email, který je považován za zahájení projektu GNOME. Linux Desktop Meetup pořádá oslavu ve středu 16. srpna od 19:00 v brněnském Charlie's square.

Ladislav Hagara | Komentářů: 20
14.8. 11:55 | IT novinky
Na šampionátu The International 2017 byl představen bot, který poráží profesionální hráče počítačové hry Dota 2. Bot zatím umí jenom zápasy 1v1. Vývojáři pracují na podpoře 5v5. Jedná se o společný projekt organizace OpenAI a společnosti Valve. Více na stránkách OpenAI a na YouTube. Dle Elona Muska je elektronický sport mnohem komplexnější než šachy nebo go [Hacker News].
Ladislav Hagara | Komentářů: 14
Těžíte nějakou kryptoměnu?
 (4%)
 (2%)
 (17%)
 (77%)
Celkem 341 hlasů
 Komentářů: 21, poslední 13.8. 09:57
    Rozcestník

    Dotaz: perl - rozdelení stingu na pismena a uložení do pole

    4.12.2007 01:50 motorcb | skóre: 12
    perl - rozdelení stingu na pismena a uložení do pole
    Přečteno: 438×
    Zdravím. V perlu mam proměnou:

    $pozdrav="Vitame vas na Nasem webu";

    a potřeboval bych jednotlivé znaky z proměné uložit do pole.

    print $pole[0]; #V
    print $pole[1]; #i
    print $pole[2]; #t
    print $pole[3]; #a
    ...


    Poradí nekdo? Diky moc :)

    Odpovědi

    4.12.2007 07:05 Jan Matis
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    my $test="toto je testovaci string"; my @array=split(//, $test);

    foreach my $pom (@array) {

    print "$pom \n"; }

    zoul avatar 4.12.2007 09:11 zoul | skóre: 43 | blog: | Boskovice
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    Jé, to jsem pako, to je úplně to stejný jako to moje :) Jak jsem viděl tři řádky kódu, automaticky jsem si myslel, že jde o něco složitějšího. Příště budu rychlejší!
    4.12.2007 10:41 Jan Matis
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    Pravdepodobne ano. Ja mam vacsinou 7:00 ceskeho casu este hlboku noc .. to len dnes som nemohol spat :)
    zoul avatar 4.12.2007 09:09 zoul | skóre: 43 | blog: | Boskovice
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    my @pole = split(//, $pozdrav);
    4.12.2007 11:39 ams
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    Jenom pro uplnost: /(.)/g je mnohonasobne rychlejsi nez split //,$_
    4.12.2007 12:31 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    len pre úplnosť, reťazec 'abcd', cmpthese:
                 Rate   split m/(.)/g
    split    378788/s      --    -87%
    m/(.)/g 2941176/s    676%      --
    
    20.2.2008 18:37 Janda Martin
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    A co když je ten text s českými znaky v utf8? Takto to rozřeže všechny ěščřžýá atd. Jak to vyřešit?
    20.2.2008 19:03 Janda Martin
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    Tak si odpovím:
    @znaky = split (/(?=\w)/,$reteec);
    
    20.2.2008 19:10 Janda Martin
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    Hm, stále mi to i tak vypisuje místo á nějaké paznaky. Když vytisknu celý řetězec tak je to ok, ale po znaku se to rozdělí na 2 patvary. Ať použiju use locale; use utf8; apod.
    24.2.2008 13:15 MartinJanda
    Rozbalit Rozbalit vše Re: perl - rozdelení stingu na pismena a uložení do pole
    Nakonec jsem to vyřešil následovně: Lze použít modul String::Multibyte, který mimo jiných funkcí nabízí i náhradu za split pro multibytové řetězce.
    use String::Multibyte;
    $utf8 = String::Multibyte->new('UTF8');
    $moje = "ěščřžýáíéů";
    @pole = $utf8->strsplit("", $moje);
    print Dumper(@pole);
    
    a funguje to.

    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.