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 00:33 | IT novinky

    FEL ČVUT vyvinula robotickou stavebnici pro mladé programátory. Stavebnice Brian byla navržená speciálně pro potřeby populární Robosoutěže. Jde ale také o samostatný produkt, který si může koupit každý fanoušek robotiky a programování od 10 let, ideální je i pro střední školy jako výuková pomůcka. Jádro stavebnice tvoří programovatelná řídicí jednotka, kterou vyvinul tým z FEL ČVUT ve spolupráci s průmyslovými partnery. Stavebnici

    … více »
    Ladislav Hagara | Komentářů: 3
    včera 20:33 | Komunita

    Ubuntu bude pro testování nových verzí vydávat měsíční snapshoty. Dnes vyšel 1. snapshot Ubuntu 25.10 (Questing Quokka).

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

    Společnost Netgate oznámila vydání nové verze 2.8.0 open source firewallové, routovací a VPN platformy pfSense (Wikipedie) postavené na FreeBSD. Přehled novinek v poznámkách k vydání.

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

    Byla vydána nová verze 6.16 živé linuxové distribuce Tails (The Amnesic Incognito Live System), jež klade důraz na ochranu soukromí uživatelů a anonymitu. Tor Browser byl povýšen na verzi 14.5.3. Linux na verzi 6.1.140. Další změny v příslušném seznamu.

    Ladislav Hagara | Komentářů: 0
    včera 12:33 | Zajímavý článek

    Člověk odsouzený za obchod s drogami daroval letos ministerstvu spravedlnosti 468 kusů kryptoměny bitcoin, které pak resort v aukcích prodal za skoro miliardu korun. Darováním se zabývá policejní Národní centrála proti organizovanému zločinu (NCOZ). Deníku N to potvrdil přímo ministr spravedlnosti Pavel Blažek (ODS). Podle resortu bylo nicméně vše v souladu s právem.

    Ladislav Hagara | Komentářů: 12
    28.5. 20:44 | Nová verze

    Svobodný a otevřený multiplatformní editor EPUB souborů Sigil (Wikipedie, GitHub) byl vydán ve verzi 2.5.0. Stejně tak doprovodný vizuální EPUB XHTML editor PageEdit (GitHub).

    Ladislav Hagara | Komentářů: 0
    28.5. 12:22 | IT novinky

    Na základě národního atribučního procesu vláda České republiky označila Čínskou lidovou republiku za zodpovědnou za škodlivou kybernetickou kampaň proti jedné z neutajovaných komunikačních sítí Ministerstva zahraničních věcí ČR. Tato škodlivá aktivita, která trvala od roku 2022 a zasáhla instituci zařazenou na seznam české kritické infrastruktury, byla provedena kyberšpionážní skupinou APT31, veřejně spojovanou se zpravodajskou službou Ministerstvo státní bezpečnosti (MSS).

    Ladislav Hagara | Komentářů: 29
    28.5. 00:11 | Nová verze

    Google Chrome 137 byl prohlášen za stabilní. Nejnovější stabilní verze 137.0.7151.55 přináší řadu novinek z hlediska uživatelů i vývojářů. Podrobný přehled v poznámkách k vydání. Opraveno bylo 11 bezpečnostních chyb. Vylepšeny byly také nástroje pro vývojáře.

    Ladislav Hagara | Komentářů: 0
    27.5. 19:22 | Nová verze

    Byl vydán AlmaLinux OS 10 s kódovým názvem Purple Lion. Podrobnosti v poznámkách k vydání. Na rozdíl od Red Hat Enterprise Linuxu 10 nadále podporuje x86-64-v2.

    Ladislav Hagara | Komentářů: 0
    27.5. 15:11 | Nová verze

    Byl vydán Mozilla Firefox 139.0. Přehled novinek v poznámkách k vydání a poznámkách k vydání pro vývojáře. Řešeny jsou rovněž bezpečnostní chyby. Nový Firefox 139 je již k dispozici také na Flathubu a Snapcraftu.

    Ladislav Hagara | Komentářů: 10
    Jaký je váš oblíbený skriptovací jazyk?
     (55%)
     (32%)
     (7%)
     (2%)
     (0%)
     (1%)
     (3%)
    Celkem 161 hlasů
     Komentářů: 12, poslední 28.5. 18:42
    Rozcestník

    Dotaz: Kalkulačka v perlu

    22.8.2012 12:54 Jack Hokus | skóre: 34 | blog: LostHeaven
    Kalkulačka v perlu
    Přečteno: 477×
    Příloha:
    Ahoj,

    trochu se učím perl. Jsem naprostý začátečník. Jako cíl jsem si zvolil vytvoření kalkulačky. Zatím se mi podařilo úspěšně sečíst dvě čísla.

    Ale zatím se mi nepodařilo přijít na to, jak ošetřit situaci, kdy bude potřeba sečíst více čísel najednou.

    Prošel jsem pár článků o perlu a první co mne napadlo bylo použít pole, ale přiznávám dobrovolně, nepochopil jsem to. Prošel jsem dost dalších návodů, ale spíš než cokoli jiného jsem z nich ještě zmatenější. Můžete mi prosím poradit? Doufám, že se zase chytím.

    Petr

    PS: kód je v příloze
    http://www.jackhokus.cz/

    Řešení dotazu:


    Odpovědi

    wamba avatar 22.8.2012 15:14 wamba | skóre: 38 | blog: wamba
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu
    Třeba takhle:
    !/usr/bin/perl -w
    use strict;
    use warnings;
    use 5.010;
    
    say
    'Tento program má jediný účel, sečist  čísla. Prosím, zadej čísla a potom (CTRL-d)';
    
    my $soucet;
    
    while ( my $cislo = <> ) {
        chomp $cislo;
        say "Vložené číslo bylo $cislo";
        $soucet += $cislo;
    }
    
    say "Součet čísel  je $soucet";
    
    This would have been so hard to fix when you don't know that there is in fact an easy fix.
    22.8.2012 15:29 Jack Hokus | skóre: 34 | blog: LostHeaven
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu
    Dobrý den,

    dík za radu. Použít cyklus mne nenapadlo.

    Dík moc

    Petr
    http://www.jackhokus.cz/
    12.10.2012 21:45 tom
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu
    perl -MList::Util -e 'print "Soucet: ", List::Util::sum(<>), "\n"'
    1
    2
    3
    4
    Soucet: 10
    
    1.9.2012 14:54 smazáno | skóre: 18 | blog: smazáno
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu
    Hele, totalne off-topic, ale ... ucit se perl v roce 2012? Vzdyt perl je uz za zenitem.
    12.10.2012 11:41 Kamil
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu
    Pro některé typy úloh (zpracování textu, některé systémové skripty..) je perl stále tím nejlepším nástrojem. Jsou tu živé a zajímavé projekty (mě osobně velice zaujal třeba Moose nebo Mojolicious), je tu CPAN. Na unixových systémech je perl všudypřítomný. A kromě toho, někteří lidi v něm prostě (z různých důvodů) rádi programují a dávají mu přednost před konkurencí, která má být údajně víc IN.
    pepe_ avatar 12.10.2012 16:34 pepe_ | skóre: 48
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu

    A co je mimo děravej Javy COOL teď ?

    13.10.2012 11:00 Kit
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu
    Řekl bych, že nejvíc cool bude teď asi Python. Ale Perl tu má stále své místo a ještě dlouho bude mít.
    Brilantní modř avatar 13.10.2012 15:36 Brilantní modř | skóre: 14
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu

    JavaScript, Ruby, Python, Java, PHP… Ale Perl je devátý nejpopulárnější jazyk na GitHub.com.

    Brilantní modř avatar 12.10.2012 18:24 Brilantní modř | skóre: 14
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu

    Kalkulačka v Perlu:

    #!/usr/bin/perl
    print("> ");
    while (<>) {
        chomp();
        print(eval(), "\n> ");
    }

    A není třeba vytvářet něco složitějšího. Mimochodem: Perl je nejlepší jazyk, jen tak dál, pokračuj a uvidíš sám, jak si Perl oblíbíš. Nenech se zastrašit tím, že je údajně out, za zenitem nebo podobnými nesmysly.

    martin-ux avatar 13.10.2012 10:30 martin-ux | skóre: 18 | Bratislava
    Rozbalit Rozbalit vše Re: Kalkulačka v perlu
    caf,

    podla mna zbytocne pouzivas "say", klasicke print/printf je stara dobra klasika. ostatne kvoli tomu si musel pouzit use 5.010 a tym si (podla mna zbytocne) specifikoval aka najnizsia verzia perlu musi byt. Moja verzia tvojho scitania:
    #!/usr/bin/perl
    
    use warnings;
    use strict;
    
    my $i = 0;
    while (<>) {
            $i += $1 if (/(\d+)\n/);   # scitaj len vtedy, ak riadok je jedna az viac cifier + \n
    }
    print "total: $i\n";
    
    @luv: <irony> tak urciteeee</irony>
    ..when you do things right, people won't be sure you've done anything at all..

    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.