abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
    dnes 14:44 | Nová verze

    Cca před rokem uvolnilo animační studio DreamWorks Animation svůj renderer MoonRay jako open source. Včera byla vydána nová verze 1.5.0.0.

    Ladislav Hagara | Komentářů: 0
    dnes 12:44 | IT novinky

    Vývojáři KDE ve spolupráci se společností Slimbook oznámili 16 palcový notebook KDE Slimbook V s předinstalovaným KDE Neon s Plasmou 6. Uvnitř se nachází procesorem AMD Ryzen 7 7840HS s integrovanou grafickou kartou Radeon 780M.

    Ladislav Hagara | Komentářů: 1
    dnes 11:22 | Zajímavý software

    Open source Atuin přináší "magickou historii shellu" aneb efektivní vyhledávání v historii příkazů a synchronizaci této historie mezi počítači. Historie je uložena v SQLite. Podporovány jsou Bash, ZSH, Fish a NuShell.

    Ladislav Hagara | Komentářů: 0
    dnes 07:00 | Nová verze

    Byla vydána nová verze 8.4 multiplatformní digitální pracovní stanice pro práci s audiem (DAW) Ardour. Přehled oprav, vylepšení a novinek v oficiálním oznámení.

    Ladislav Hagara | Komentářů: 0
    včera 21:55 | Nová verze

    Vyšla nová verze výukového softwaru GCompris 4.0. Po devíti letech práce bylo dokončeno sjednocení grafického návrhu podle stanovených pravidel a společně s 8 novými aktivitami se jejich celkový počet navýšil na 190. Od roku 2014 je aplikace přepsána z Gtk do QtQuick a díky tomu je nyní možné ji používat na různých platformách jako je GNU/Linux, Android, Windows i MacOS. Ke stažení je na stránkách aplikace nebo ve správcích softwaru daných platforem.

    Jan Papež | Komentářů: 0
    včera 21:44 | Nová verze

    Byla vydána nová vývojová verze 2.99.18 svobodné aplikace pro úpravu a vytváření rastrové grafiky GIMP. Jedná se o další krok směrem k verzi 3 postavené na GTK 3. Podrobný přehled novinek i s náhledy a videi v oznámení o vydání a v souboru NEWS na GitLabu. Stabilní verze GIMPu je 2.10.36.

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

    Na Snapcraftu byla falešná kryptoměnová peněženka Exodus (už je v karanténě). Uživatel přišel o 9 bitcoinů.

    Ladislav Hagara | Komentářů: 0
    včera 15:22 | Nová verze

    Organizace Apache Software Foundation (ASF) vydala verzi 21 integrovaného vývojového prostředí a vývojové platformy napsané v Javě NetBeans (Wikipedie). Přehled novinek na GitHubu. Instalovat lze také ze Snapcraftu a Flathubu.

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

    Komunikační software Signal (Wikipedie) v nové beta verzi umožňuje komunikaci mezi uživateli bez prozrazení telefonního čísla. Telefonní číslo je ale nadále nutné zadat při registraci do Signalu.

    Ladislav Hagara | Komentářů: 33
    včera 00:22 | Nová verze

    Google Chrome 122 byl prohlášen za stabilní. Nejnovější stabilní verze 122.0.6261.57 přináší řadu oprav a vylepšení (YouTube). Opraveno bylo 12 bezpečnostních chyb. Vylepšeny byly také nástroje pro vývojáře.

    Ladislav Hagara | Komentářů: 0
    Kolik máte nálepek na víku notebooku?
     (17%)
     (59%)
     (5%)
     (3%)
     (6%)
     (10%)
    Celkem 359 hlasů
     Komentářů: 13, poslední včera 21:51
    Rozcestník

    Dotaz: PERL odstranenie duplicit v v poli poli (2-dimenzinalnom)

    6.12.2010 01:48 xsustek | skóre: 6
    PERL odstranenie duplicit v v poli poli (2-dimenzinalnom)
    Přečteno: 201×
    Ahojte,

    napada niekoho algoritmus alebo nejaky odkaz na vymazanie duplicit v 2-dimenzionalnom poli (resp. poli referencii na polia). Nejde o duplicity referencii.

    Odpovědi

    6.12.2010 02:35 buff | skóre: 10 | blog: buff
    Rozbalit Rozbalit vše Re: PERL odstranenie duplicit v v poli poli (2-dimenzinalnom)
    Ahoj. Nerozumím, co přesně chceš. Řekněme, že máš pole
    
    @pole = (
      [1, 2],
      [3, 4],
      [1, 2],
      [2, 2]
    );
    
    
    Co má být na výstupu?
    6.12.2010 03:43 xsustek | skóre: 6
    Rozbalit Rozbalit vše Re: PERL odstranenie duplicit v v poli poli (2-dimenzinalnom)
    Na vystupe ma byt pole @pole = ( [1, 2], [3, 4], [2, 2] );

    6.12.2010 09:58 Ondřej Kopka | skóre: 20 | blog: ondrejk
    Rozbalit Rozbalit vše Re: PERL odstranenie duplicit v v poli poli (2-dimenzinalnom)
    Podívej se na tohle, mělo by to fungovat i ve tvém případě:
    perldoc -q duplicate
    
    6.12.2010 10:48 NeoV | skóre: 23
    Rozbalit Rozbalit vše Re: PERL odstranenie duplicit v v poli poli (2-dimenzinalnom)
    pokial tie polia nie su moc rozsiahle, tak si vystacis aj s niecim takymto:
    @pole = (
      [1, 2],
      [3, 4],
      [1, 2],
      [2, 2]
    );
    
    my %h;
    @pole = grep {$h{join(":",@$_)}++ == 0} @pole;
    
    use Data::Dumper;
    print Dumper(\@pole); 
    
    wamba avatar 6.12.2010 17:13 wamba | skóre: 38 | blog: wamba
    Rozbalit Rozbalit vše Re: PERL odstranenie duplicit v v poli poli (2-dimenzinalnom)
    No s využitím uniq_by s CPAN by to šlo takhle:

    use warnings;
    
    use strict;
    
    use 5.010;
    
    use Data::Dumper;
    
    
    sub uniq_by(&@)
    
    {
    
     my $code = shift;
    
    
     my %present;
    
     return grep {
    
     my $key = $code->( local $_ = $_ );
    
     !$present{$key}++
    
     } @_;
    
    }
    
    
    my @x =  ([1, 1], [2, 2], [3, 5], [2, 2], [3,4], [2,1], [1,1]);
    
    say Dumper( uniq_by { "@$_"  } @x);
    
    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.