Dnešním dnem lze již také v Česku nakupovat na Google Store (telefony a sluchátka Google Pixel).
Apple představil (keynote) iPad Pro s čipem Apple M4, předělaný iPad Air ve dvou velikostech a nový Apple Pencil Pro.
Richard Biener oznámil vydání verze 14.1 (14.1.0) kolekce kompilátorů pro různé programovací jazyky GCC (GNU Compiler Collection). Jedná se o první stabilní verzi řady 14. Přehled změn, nových vlastností a oprav a aktualizovaná dokumentace na stránkách projektu. Některé zdrojové kódy, které bylo možné přeložit s předchozími verzemi GCC, bude nutné upravit.
Free Software Foundation zveřejnila ocenění Free Software Awards za rok 2023. Vybráni byli Bruno Haible za dlouhodobé příspěvky a správu knihovny Gnulib, nováček Nick Logozzo za front-end Parabolic pro yt-dlp a tým Mission logiciels libres francouzského státu za nasazování svobodného softwaru do praxe.
Před 10 lety Microsoft dokončil akvizici divize mobilních telefonů společnosti Nokia a pod značkou Microsoft Mobile ji zanedlouho pohřbil.
Fedora 40 release party v Praze proběhne v pátek 17. května od 18:30 v prostorách společnosti Etnetera Core na adrese Jankovcova 1037/49, Praha 7. Součástí bude program kratších přednášek o novinkách ve Fedoře.
Stack Overflow se dohodl s OpenAI o zpřístupnění obsahu Stack Overflow pro vylepšení OpenAI AI modelů.
AlmaLinux byl vydán v nové stabilní verzi 9.4 (Mastodon, 𝕏). S kódovým názvem Seafoam Ocelot. Přehled novinek v příspěvku na blogu a v poznámkách k vydání.
Před 50 lety, 5. května 1974 v žurnálu IEEE Transactions on Communications, Vint Cerf a Bob Kahn popsali protokol TCP (pdf).
Bylo vydáno do češtiny přeložené číslo 717 týdeníku WeeklyOSM přinášející zprávy ze světa OpenStreetMap.
#!/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
Tiskni Sdílej: