Byly publikovány informace o další zranitelnosti v procesorech. Nejnovější zranitelnost byla pojmenována VMScape (CVE-2025-40300, GitHub) a v upstream Linuxech je již opravena. Jedná se o variantu Spectre. KVM host může číst data z uživatelského prostoru hypervizoru, např. QEMU.
V červenci loňského roku organizace Apache Software Foundation (ASF) oznámila, že se částečně přestane dopouštět kulturní apropriace a změní své logo. Dnes bylo nové logo představeno. "Indiánské pírko" bylo nahrazeno dubovým listem a text Apache Software Foundation zkratkou ASF. Slovo Apache se bude "zatím" dál používat. Oficiální název organizace zůstává Apache Software Foundation, stejně jako názvy projektů, například Apache HTTP Server.
Byla vydána (𝕏) srpnová aktualizace aneb nová verze 1.104 editoru zdrojových kódů Visual Studio Code (Wikipedie). Přehled novinek i s náhledy a videi v poznámkách k vydání. Ve verzi 1.104 vyjde také VSCodium, tj. komunitní sestavení Visual Studia Code bez telemetrie a licenčních podmínek Microsoftu.
Spotify spustilo přehrávání v bezztrátové kvalitě. V předplatném Spotify Premium.
Spoluzakladatel a předseda správní rady americké softwarové společnosti Oracle Larry Ellison vystřídal spoluzakladatele automobilky Tesla a dalších firem Elona Muska na postu nejbohatšího člověka světa. Hodnota Ellisonova majetku díky dnešnímu prudkému posílení ceny akcií Oraclu odpoledne vykazovala nárůst o více než 100 miliard dolarů a dosáhla 393 miliard USD (zhruba 8,2 bilionu Kč). Hodnota Muskova majetku činila zhruba 385 miliard dolarů.
Bylo vydáno Eclipse IDE 2025-09 aneb Eclipse 4.37. Představení novinek tohoto integrovaného vývojového prostředí také na YouTube.
T-Mobile od 15. září zpřístupňuje RCS (Rich Communication Services) zprávy i pro iPhone.
Společnost ARM představila platformu Arm Lumex s Arm C1 CPU Cluster a Arm Mali G1-Ultra GPU pro vlajkové chytré telefony a počítače nové generace.
Unicode Consortium, nezisková organizace koordinující rozvoj standardu Unicode, oznámila vydání Unicode 17.0. Přidáno bylo 4 803 nových znaků. Celkově jich je 159 801. Přibylo 7 nových Emoji.
Apple představil (YouTube) telefony iPhone 17 Pro a iPhone 17 Pro Max, iPhone 17 a iPhone Air, sluchátka AirPods Pro 3 a hodinky Watch Series 11, Watch SE 3 a Watch Ultra 3.
#!/usr/bin/perl -w use strict; open(FAJL,$ARGV[0]); my @lines = < FAJL > close(FAJL); my $i; my $vyskyt=0; for ( $i=0; $i<(scalar @lines)-1; $i++ ) { $vyskyt += ($lines[$i] =~ tr/msgstr/msgstr/); } print $vyskyt."\n";Ako vstup je pouzity po subor pre lokalizaciu isteho programu. Subor ma 3265 riadkov. Retazec msgstr sa vyskytuje na riadku maximalne jedenkrat, navyse sa nevyskytuje na kazdom riadku a v pocte riadkov su zahrnute aj prazdne riadky. Kazdopadne pocet msgstr nema sancu prekrocit hranicu 3265 vyskytov. Pocet vyskytov by sa mal pohybovat niekde v rozpati 600-700 vyskytov. Avsak po spusteni skriptiku mi to hodi cislo 20850 vyskytov. Cim je to sposobene?
$vyskyt += ($lines[$i] =~ /msgstr/);
a melo by to fungovat.
=~ /msgstr/
je to iste ako =~ m/msgstr/
?
tr
není s
ani m
#!/usr/bin/env perl use warnings; use strict; undef $/; my $vyskyt=0; $_ = <>; $vyskyt++ while m/msgstr/g; print $vyskyt,"\n";Trošku zkušenější třeba takto
#!/usr/bin/env perl use warnings; use strict; undef $/; print scalar @{[<> =~ m/msgstr/g]}, "\n";
#!/usr/bin/env perl use warnings; use strict; my $vyskyt = 0; $vyskyt += @{[m/msgstr/g]} while <> ; print $vyskyt,"\n";Nebo dokonce jako onliner
perl -ne '$vyskyt += @{[m/msgstr/g]}; END{print $vyskyt,"\n"}'
=~ /msgstr/
to iste ako =~ m/msgstr/
? Odpoviem si sam, je.
btw, ešte môžeš skúsiť nasledovné:
$vyskyt = grep { m/msgstr/ } <>; # alebo print scalar grep { m/msgstr/ } <>;
$/ = 'msgstr'; 1 while <>; print $., "\n";
Inak možno použiť i nasledovnú konštrukciu:Máš bod$/ = 'msgstr'; 1 while <>; print $., "\n";
$/ = 'msgstr'; 1 while <>; print $. - 1, "\n";
undef $/; print -1 + scalar split (/msgstr/, <>), "\n";
scalar
je tam zbytečné, protože + to přepne do skalárního kontextu. Použít split mě nenapadlo a přitom je to tak hezké perl -ne '$a+=-1+split/msgstr/; END{print "$a\n"}'Ale když už jsme u toho splitu, tak hezčí by bylo
perl -Fmsgstr -ane '$a+=-1+@F; END{print "$a\n"}'
perl -Fmsgstr -ane'$a+=@F-1;END{print "$a\n"}'
perl -Fmsgstr -ane'$a+=$#F;END{print "$a\n"}'
perl -e'undef$/;print-1+split("msgstr",<>),"\n"'a nejkratší varianta se čtením po řádcích
perl -Fmsgstr -ane'$a+=$#F;END{print"$a\n"}'
perl -ne'BEGIN{$/="msgstr"}END{print$.-1,"\n"}'
perl -ne'BEGIN{$/=shift}END{print$.-1,"\n"}' msgstrrozdiel oproti nižšie spomenutému grep-u je v počítaní výskytov a nie riadkov s výskytom
v porovnani so split, resp s $/ má najkratší variant nevýhodu v tom, že hľadaný reťazec nemôže obsahovať new-line ... takže o tri znaky viac
perl -ne'BEGIN{$/="msgstr"}END{print$.-1,"\n"}'
grep -c msgstr
$count +=($sentence =~ tr/*/*/)
. Zhodou okolnosti som pracoval na preklade isteho softu a zacalo mi v hlave vrtat(zo zvedavosti) ako by sa dalo v perle realizovat spocitanie vyskytu vybraneho retazca v urcitom subore, vyuzitim zmienovanej konstrukcie. Neslo mi o to aby to bolo naj a ani o to aby som spocital pocet retazcov v preklade. Tie sa daju lahko spocitat cez msgfmt --statistics your.po
a netreba ani nic programovat. Potom si sa objavil ty a prisiel so svojimi minimalistickymi rieseniami, coz je fajn aspon sa nieco priucim. S preliezania webu a citania programov mam vsak skusenost taku, ze riesenia tvojho druhu sa moc nepouzivaju. Preco? Stale vsak uplne nerozumiem ako perl tie znaky pocita. Moj odhad je taky, ze obsah zatvorky vyhodnoti ako boolean a ten potom vrati ako 1 alebo 0. A pretoze ked v '$sentence' najde '*' vrati true co je 1 je mozne tohoto faktu vyuzit napriklad na urcenie poctu znakov v retazci. Mam pravdu, alebo sa mylim?
tr/SEARCHLIST/REPLACEMENTLIST/cds y/SEARCHLIST/REPLACEMENTLIST/cds Transliterates all occurrences of the characters found in the search list with the corresponding character in the replacement list. It returns the number of characters replaced or deleted. If no string is specified via the =~ or !~ operator, the $_ string is transliterated. (The string specified with =~ must be a scalar variable, an array element, a hash element, or an assignment to one of those, i.e., an lvalue.)
odpoveď na otázku "prečo" je jednoduchá ... drvivá vačšina programátorov sa zastaví pri prvom funkčnom riešení. A ako vidíš aj z tejto diskusie, riešenie iterovalo v niekoľkých krokoch. Nevraviac o tom, že tu sú vypísané asi všetky kroky, podľa toho, kto si kedy na akú vlastnosť spomenul
Tiskni
Sdílej: