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 13:22 | IT novinky

    Steve Jobs a superpočítač Cray-1 budou vyobrazeny na pamětních jednodolarových mincích vyražených v příštím roce v rámci série Americká inovace. Série má 57 mincí, tj. 57 inovací. Poslední 4 mince budou vyraženy v roce 2032.

    Ladislav Hagara | Komentářů: 1
    včera 12:22 | Pozvánky

    Byl zveřejněn průběžně aktualizovaný program konference OpenAlt 2025 o otevřeném softwaru a datech, IT bezpečnosti, DIY a IoT. Konference proběhne o víkendu 1. a 2. listopadu v prostorách FIT VUT v Brně. Vstup je zdarma.

    Ladislav Hagara | Komentářů: 0
    včera 12:00 | IT novinky

    Senát včera opětovně nepřijal návrh ústavního zákona, který měl do Listiny základních práv a svobod zakotvit právo občanů platit v hotovosti nebo být off-line. Návrh předložila skupina senátorů již v roce 2023. Senát dnes návrh neschválil, ale ani nezamítl. Pokud by ho přijal, dostala by ho k projednání Sněmovna a vyjádřila by se k němu vláda.

    Ladislav Hagara | Komentářů: 9
    16.10. 23:55 | 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 13.0 (Mastodon). Forgejo je fork Gitei.

    Ladislav Hagara | Komentářů: 0
    16.10. 14:22 | Bezpečnostní upozornění

    Společnost Eclypsium se na svém blogu rozepsala o bezpečnostním problému počítačů Framework. Jedná se o zranitelnost v UEFI umožňující útočníkům obejít Secure Boot.

    Ladislav Hagara | Komentářů: 1
    16.10. 02:33 | Nová verze

    Editor kódů Zed (Wikipedie) po macOS a Linuxu s verzí 0.208.4běží také ve Windows.

    Ladislav Hagara | Komentářů: 7
    15.10. 17:44 | IT novinky

    Apple dnes představil 14palcový MacBook Pro, iPad Pro a Apple Vision Pro s novým čipem M5.

    Ladislav Hagara | Komentářů: 32
    15.10. 13:55 | Nová verze

    Debian pro mobilní zařízení Mobian (Wikipedie) byl vydán ve verzi 13 Trixie. Nová stabilní verze je k dispozici pro PINE64 PinePhone, PinePhone Pro a PineTab, Purism Librem 5, Google Pixel 3a a 3a XL, OnePlus 6 a 6T a Xiaomi Pocophone F1.

    Ladislav Hagara | Komentářů: 2
    15.10. 13:11 | IT novinky

    Operátor O2 představil tarif Datamanie 1200 GB . Nový tarif přináší 1200 GB dat s neomezenou 5G rychlostí, a také možnost neomezeného volání do všech sítí za 15 Kč na den. Při roční variantě předplatného zákazníci získají po provedení jednorázové platby celou porci dat najednou a mohou je bezstarostně čerpat kdykoli během roku. Do 13. listopadu jej O2 nabízí za zvýhodněných 2 988 Kč. Při průměrné spotřebě tak 100 GB dat vychází na 249 Kč měsíčně.

    Ladislav Hagara | Komentářů: 15
    15.10. 12:33 | Bezpečnostní upozornění

    Byly publikovány informace o útoku na zařízení s Androidem pojmenovaném Pixnapping Attack (CVE-2025-48561). Aplikace může číst citlivá data zobrazovaná jinou aplikací. V demonstračním videu aplikace čte 2FA kódy z Google Authenticatoru.

    Ladislav Hagara | Komentářů: 1
    Jaké řešení používáte k vývoji / práci?
     (38%)
     (46%)
     (19%)
     (21%)
     (24%)
     (18%)
     (21%)
     (18%)
     (18%)
    Celkem 231 hlasů
     Komentářů: 14, poslední 14.10. 09:04
    Rozcestník

    Dotaz: Perl a konverze kontextu pole->seznam

    29.5.2007 19:27 amnesiac
    Perl a konverze kontextu pole->seznam
    Přečteno: 197×
    Zdravim.

    Sorry za zacatecnicky dotaz, ale nemuzu prijit na to jak primo vytisknout hodnotu prvku pole vraceneho podprogramem. Nasledujici kod by mel vytisknout 4.

    perl -wle 'print ${&mysub}[1][1];sub mysub { my @x = [[1,2],[3,4]]; return @x;}'
    Use of uninitialized value in print at -e line 1.
    

    Pritom pokud to pole vratim primo, nejak dojde ke konverzi na seznam a hodnota se vypise spravne:

    perl -wle 'print ${&mysub}[1][1];sub mysub { return [[1,2],[3,4]];}'
    4
    
    Mohl by to nekdo logicky vysvelit ?

    Dik.

    Odpovědi

    29.5.2007 20:13 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    perl -wle 'print ${&mysub}[1][1];sub mysub { print "want scalar\n" unless wantarray; return [[1,2],[3,4]];}'
    want scalar
    4
    
    v skalárnom kontexte sa @x vyhodnotí ako 1
    29.5.2007 23:26 amnesiac
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    Ok, dik. Jak ale vynutit, aby se v print volalo mysub v seznamovem kontextu ? Jinymi slovy jak prevest nasledujici konstrukci do jedineho volani print bez nutnosti ukladat do pomocneho pole ?

    @array = &mysub;
    print $pole[1][1];
    
    sub mysub () {
      @x = ( [1, 2], [3, 4] );
      
      return @x;
    }
    
    Povedlo se mi to pres vraceni skalaru - reference na pole, ale to asi nebude to prave orechove :(

    print ${mysub}[1][1];
    
    sub mysub () {
      @x = ( [1, 2], [3, 4] );
      
      return \@x;
    }
    
    30.5.2007 08:22 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    print [ &mysub ]->[0][1][1];
    print ((&mysub)[0]->[1][1]);
    
    30.5.2007 10:41 amnesiac
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    Jj, diky.

    Ta prvni konstrukce pres anonymni pole me mela napadnout. Je tam kvuli tomu nejaka rezie navic (vytv. pole) ?

    Tu druhou jsem priznavam zatim nepochopil :-( Vnitrni zavorky kolem &mysub zrejme navozuji seznamovy kontext, ale pritomnost tech vnejsich mi stale unika.

    30.5.2007 11:03 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    nie ste sám, v kom ten druhý príklad vzbudzuje nezodpovedané otázky :-) (mňa osobne trápi, prečo tam musí byť operátor ->)
    30.5.2007 13:30 amnesiac
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    Ten operator -> tam IMHO ma logiku, protoze mysub vraci pole odkazu na pole. Ekvivalentni zapis pro dereferenci by pak byl:

    print (${(&mysub)[1]}[1]);
    
    versus puvodni
    
    print ((&mysub)[1]->[1]);

    Vrta mi hlavou, jak jste mi mohl spravne odpovedet a pritom tomu sam nerozumite ;-)

    30.5.2007 14:04 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    logiku tam samozrejme má, ale je tu jedno ale: -> sa môže medzi zátvorkami vynechávať.
    $x->[0][0]; vs. $x->[0]->[0];
    evidentne som niektorú kapitolu preskočil :-)

    ako? jednoducho, zapísal som ako by som si to predstavoval a potom ošetroval syntax error :-D

    30.5.2007 14:30 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    Je to jedna z perlových syntaktických ne konzistencí. V tom výrazu musí být to -> uvedeno nejméně jednou a ty další se mohou vynechat, protože jinak než odkazem to být nemůže. Proč? Zeptej se Larryho :-(
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    30.5.2007 14:44 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl a konverze kontextu pole->seznam
    aha, takto povedané mi to dáva zmysel. dík.

    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.