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 04:00 | Nová verze

    raylib (Wikipedie), tj. multiplatformní open-source knihovna pro vývoj grafických aplikací a her, byla vydána ve verzi 6.0.

    Ladislav Hagara | Komentářů: 0
    včera 18:33 | IT novinky

    Nové verze AI modelů. Společnost OpenAI představila GPT‑5.5. Společnost DeepSeek představila DeepSeek V4.

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

    Nová čísla časopisů od nakladatelství Raspberry Pi zdarma ke čtení: Raspberry Pi Official Magazine 164 (pdf) a Hello World 29 (pdf).

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

    Bylo oznámeno, že webový prohlížeč Opera GX zaměřený na hráče počítačových her je už také na Flathubu and Snapcraftu.

    Ladislav Hagara | Komentářů: 0
    23.4. 23:11 | IT novinky

    Akcionáři americké mediální společnosti Warner Bros. Discovery dnes schválili převzetí firmy konkurentem Paramount Skydance za zhruba 110 miliard dolarů (téměř 2,3 bilionu Kč). Firmy se na spojení dohodly v únoru. O část společnosti Warner Bros. Discovery dříve usilovala rovněž streamovací platforma Netflix, se svou nabídkou však neuspěla. Transakci ještě budou schvalovat regulační orgány, a to nejen ve Spojených státech, ale také

    … více »
    Ladislav Hagara | Komentářů: 0
    23.4. 22:33 | Nová verze

    Canonical vydal (email, blog, YouTube) Ubuntu 26.04 LTS Resolute Raccoon. Přehled novinek v poznámkách k vydání. Vydány byly také oficiální deriváty Edubuntu, Kubuntu, Lubuntu, Ubuntu Budgie, Ubuntu Cinnamon, Ubuntu Kylin, Ubuntu Studio, Ubuntu Unity a Xubuntu. Jedná se o 11. vydání s dlouhodobou podporou (LTS).

    Ladislav Hagara | Komentářů: 2
    23.4. 11:55 | Nová verze

    V programovacím jazyce Go naprogramovaná webová aplikace pro spolupráci na zdrojových kódech pomocí gitu Gitea (Wikipedie) byla vydána v nové verzi 1.26.0. Přehled novinek v příspěvku na blogu.

    Ladislav Hagara | Komentářů: 0
    23.4. 04:44 | Pozvánky

    Ve středu 29. dubna 2026 se v pražské kanceláři SUSE v Karlíně uskuteční 7. Mobile Linux Hackday, komunitní setkání zaměřené na Linux na mobilních zařízeních, kernelový vývoj i uživatelský prostor. Akce proběhne od 10:00 do večerních hodin. Hackday je určen všem zájemcům o praktickou práci s Linuxem na telefonech. Zaměří se na vývoj aplikací v userspace, například bankovní aplikace, zpracování obrazu z kamery nebo práci s NFC, i na úpravy

    … více »
    lkocman | Komentářů: 1
    22.4. 21:55 | Nová verze

    LilyPond (Wikipedie) , tj. multiplatformní svobodný software určený pro sazbu notových zápisů, byl vydán ve verzi 2.26.0. Přehled novinek v aktualizované dokumentaci.

    Ladislav Hagara | Komentářů: 0
    22.4. 20:33 | Nová verze

    Byla vydána nová verze 11.0.0 otevřeného emulátoru procesorů a virtualizačního nástroje QEMU (Wikipedie). Přispělo 237 vývojářů. Provedeno bylo více než 2 500 commitů. Přehled úprav a nových vlastností v seznamu změn.

    Ladislav Hagara | Komentářů: 0
    Které desktopové prostředí na Linuxu používáte?
     (14%)
     (8%)
     (2%)
     (13%)
     (31%)
     (3%)
     (6%)
     (2%)
     (15%)
     (25%)
    Celkem 1414 hlasů
     Komentářů: 30, poslední 3.4. 20:20
    Rozcestník

    Dotaz: problem v Perlu s Getopt::Long

    21.1.2008 13:03 grudge
    problem v Perlu s Getopt::Long
    Přečteno: 375×
    ps. pokladam dotaz v originalnim zneni, jak jsem ho poslal maintainerovi Getopt::Long
    #!/usr/bin/perl -w
    #
    # Please don't reject my following questions. I spend lot of time to solve that. I use perl very often
    # and i know from previous, that Getopt::Long does not like me ;) and if i've needed, i'd used Getopt::Std 
    # or 'write-on-scratch' my own @ARGV parser, but now i am working on fairly large and complex
    # Perl project and would like to use this, with useful features filled, module.
    #
    # q.1) How to order exit program if passed mix(bundled) of correct and incorrect options?
    #	-xV results in 'unknown option: x' message and then is executed version() ..
    #	!solved -- take a look below
    #
    # q.2) How to order strictly, that one-letter option !must be passed only with '-', not with '-|--'?
    #	--V :prints version as well as -V ..
    #	--p xx :prints "xx" as well as -pxx|-p xx|--print=xx|--print xx
    #
    # To solve this problems, i had tried all possible and impossible parameters for
    # Getopt::Long::Configure() but with no success.
    #
    
    use strict;
    use Getopt::Long;
    
    ##Subs
    
    sub version {
            print << 'EOF';
    this needs no version
    EOF
    	exit 0;
    };
    
    # q.3) So, how should i globally configure Getopt::Long, to became options handling exactly as is
    #	described below in usage() func?
    
    sub usage {
    	print << 'EOF';
    Usage:
    	-V, --version		print version message.
    	-?, -h, --help		print help message.
    	-p input_str
    	--print=input_str	print given string.
    EOF
    	exit 0;
    };
    
    ##Body
    
    my($version, $usage, $print_input);
    
    # When "no_ignore_case" omitted, by some ?magic reasons GetOptions returns
    # correctly, that '--V' is 'Unknown option'..
    #
    # When:
    # Getopt::Long::Configure("bundling");
    # GetOptions("V" => \$version);
    # '--V' is interpreted such a 'Unknown option: v'
    #
    # And much more strange examples can be made..
    Getopt::Long::Configure("bundling", "no_auto_abbrev", "no_ignore_case");
    
    GetOptions(
            "version|V"	=> \$version, 	## !! called &sub from here will be
    					## executed even if other opts failed..
    					## !! assign $var here, rather then
    					## call sub, preserves this behaviour..
    					## In main documentation, there is not
    					## lost a word about this and so worst,
    					## direct calling sub is there advised.
    	"help|h|?"	=> \$usage,
    	"print|p=s"	=> \$print_input,
    ) || die "bad option(s)\n";
    
    ## so, let's call what should be called from here..
    &version if $version;
    &usage if $usage;
    print "\"$print_input\" passed\n" if $print_input;
    
    ## only mark, where script ends
    print "all done, this is last exit\n";
    exit 0;
    
    # !!
    # So my final work-aroud is:
    # Complete please at least documentation 'man Getopt::Long' with some reference about
    # this "traps" ..
    #
    # Thanks for work-around &
    # Best Regards

    Odpovědi

    21.1.2008 13:18 grudge
    Rozbalit Rozbalit vše Re: problem v Perlu s Getopt::Long
    ps. diky za odpoved a zdravi ntz
    21.1.2008 15:49 grudge
    Rozbalit Rozbalit vše Re: problem v Perlu s Getopt::Long
    ps. slidil jsem na freenode a dozvedel jsem se, ze si budu muset @ARGV asi parsovat sam v pripade nejake slozite veci.. hmm.

    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.