Dellu byla odcizena databáze zákazníků (jméno, adresa, seznam zakoupených produktů) [Customer Care, Bleeping Computer].
V lednu byl otevřen editor kódů Zed od autorů editoru Atom a Tree-sitter. Tenkrát běžel pouze na macOS. Byl napevno svázán s Metalem. Situace se ale postupně mění. V aktuálním příspěvku Kdy Zed na Linuxu? na blogu Zedu vývojáři popisují aktuální stav. Blíží se alfa verze.
O víkendu 11. a 12. května lze navštívit Maker Faire Prague, festival plný workshopů, interaktivních činností a především nadšených a zvídavých lidí.
Byl vydán Fedora Asahi Remix 40, tj. linuxová distribuce pro Apple Silicon vycházející z Fedora Linuxu 40.
Představena byla služba Raspberry Pi Connect usnadňující vzdálený grafický přístup k vašim Raspberry Pi z webového prohlížeče. Odkudkoli. Zdarma. Zatím v beta verzi. Detaily v dokumentaci.
Byla vydána verze R14.1.2 desktopového prostředí Trinity Desktop Environment (TDE, fork KDE 3.5). Přehled novinek v poznámkách k vydání, podrobnosti v seznamu změn.
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.
$cislosmajlu = "---:3434: dasdas :2343:dasd a :5678:adasd dsadas:43587:aaaaaaa:23456879:";
if ($cislosmajlu =~ /(:([0-9]+):)+/) { print $1 ;}
Řešení dotazu:
Kdyžtak toto:
$cislosmajlu = "---:3434: dasdas :2343:dasd a :5678:adasd dsadas:43587:aaaaaaa:23456879:";
map {print "$_\n"} grep {m/[0-9]+/} split(':', $cislosmajlu);
$cislosmajlu = "---:3434: dasdas :2343:dasd a :5678:adasd dsadas:43587:aaaaaaa:23456879:";
while ( $cislosmajlu =~ /(:([0-9]+):)+/g ) { print $1 ;}
my $cislo_smajlu
= "---:3434: dasdas :2343:dasd a :5678:adasd dsadas:43587:aaaaaaa:23456879:";
foreach my $cislo (
$cislo_smajlu =~ m/(?: :( [0-9]+ ): )+/xg
) {
print "$cislo ";
}
m/:( [0-9]+ ):/xg
m
je tam více méně zbytečný, muselo by tam být v případě např:
m{ :( [0-9]+ ): }xg
x
umožňuje (pro přehlednost) vkládat do regulárního výrazu mezery a g
je "global" tedy najdi všechny výrazy nejen první
@smajly = (text =~ /:([0-9]+):/g);
Tiskni Sdílej: