Poněvadž Redis už není svobodný, konsorcium Linux Foundation a Amazon Web Services (AWS), Google Cloud, Oracle, Ericsson a Snap Inc. společně představili svobodný fork Redisu s názvem Valkey.
Sam Bankman-Fried, zakladatel zkrachovalé kryptoměnové burzy FTX, byl dnes odsouzen k 25 letům vězení [Yahoo Finance].
Proxmox oznámil, že usnadňuje migraci z VMware ESXi do Proxmoxu.
Byla vydána nová verze 2.53.18.2 svobodného multiplatformního balíku internetových aplikací SeaMonkey (Wikipedie). Přehled novinek v poznámkách k vydání.
Na blogu programovacího jazyka Swift byl publikován příspěvek Psaní aplikací pro GNOME v programovacím jazyce Swift. Používá se Adwaita pro Swift.
egui je GUI knihovna pro programovací jazyk Rust běžící na webu i nativně. Vydána byla verze 0.27.0.
Byla vydána nová verze 6.1 živé linuxové distribuce Tails (The Amnesic Incognito Live System), jež klade důraz na ochranu soukromí uživatelů a anonymitu. Přehled změn v příslušném seznamu. Tor Browser byl povýšen na verzi 13.0.13. Thunderbird na verzi 115.9.0.
Linka STOPonline.cz v roce 2023 přijala 3700 hlášení závadného obsahu na internetu, 22 bylo předáno PČR, 23 bylo předáno ISP a 944 závadových domén zobrazujících dětskou nahotu či pornografii bylo nahráno do mezinárodního systému ICCAM, který je spravován asociací INHOPE.
Byla publikována podrobná analýza v upstreamu již opravené bezpečnostní chyby CVE-2024-1086 v Linuxu v nf_tables.
Byla vydána nová verze 4.1 svobodného 3D softwaru Blender. Přehled novinek i s náhledy a videi v obsáhlých poznámkách k vydání.
Ahojte
Snazim sa pochopit OOP v perl. Precital som rozne tutorials a pokusam sa vytvorit jednoduchy pm modul + script ktory sa nan odvolava. Tu je priklad modulu main.pm.
##########################
package main_pack;
sub new {
my ($my_class, $w, $h) = @_;
$obj = {};
bless $obj;
$obj->{width}=$w;
$obj->{height}=$h;
return $obj;
}
sub area{
my $obj = shift;
return $obj->{width} * $obj->{height};
}
#####################
a tu sa pokusam pouzit dany modul
#####################
use main;
$test = main_pack->new(5, 5);
print "skuska.: , $test->area(), ";
#####################
lenze to skonci chybou .:main.pm did not return a true value at Untitled3 line 2. Neviem za boha co je tam zle.
Každý modul v Perlu musí mít na konci pravdivou návratovou hodnotu. Proto je potřeba do každého modulu nakonec napsat 1;
nějak takto:
package xyz; . . . 1;
dakujem ta jednotka pomohla ale nikde som to v ziadnom navode nevidel. este raz dik
We need the 1; at the end because when a module loads Perl checks to see that the module returns a true value to ensure it loaded OK. You could put any true value at the end (see Code::Police) but 1 is the convention.
Jinak doporučuji Perl od Pavla Satrapy, rok vydání je sice 2000, ale autor má talent vysvětlit věci jasně, poutavě a srozumitelně.
Tiskni Sdílej: