Singularity (YouTube) je nejnovější otevřený film od Blender Studia. Jedná se o jejich první 4K HDR film.
Vyšla hra Život Není Krásný: Poslední Exekuce (Steam, ProtonDB). Kreslená point & click adventura ze staré školy plná černého humoru a nekorektního násilí. Vžijte se do role zpustlého exekutora Vladimíra Brehowského a projděte s ním jeho poslední pracovní den. Hra volně navazuje na sérii Život Není Krásný.
Společnost Red Hat představila Fedora Hummingbird, tj. linuxovou distribuci s nativním kontejnerovým designem určenou pro vývojáře využívající AI agenty.
Hru The Legend of Zelda: Twilight Princess od společnosti Nintendo si lze nově díky projektu Dusklight (původně Dusk) a reverznímu inženýrství zahrát i na počítačích a mobilních zařízeních. Vyžadována je kopie původní hry (textury, modely, hudba, zvukové efekty, …). Ukázka na YouTube. Projekt byl zahájen v srpnu 2020.
Byla vydána nová major verze 29.0 programovacího jazyka Erlang (Wikipedie) a související platformy OTP (Open Telecom Platform, Wikipedie). Detailní přehled novinek na GitHubu.
Po zranitelnostech Copy Fail a Dirty Frag přichází zranitelnost Fragnesia. Další lokální eskalace práv na Linuxu. Zatím v upstreamu neopravena. Přiřazeno ji bylo CVE-2026-46300.
Sovereign Tech Agency (Wikipedie) prostřednictvím svého fondu Sovereign Tech Fund podpoří KDE částkou 1 285 200 eur.
Google na včerejší akci The Android Show | I/O Edition 2026 (YouTube) představil celou řadu novinek: Gemini Intelligence, notebooky Googlebook, novou generaci Android Auto, …
Evropská komise by do léta mohla předložit návrh normy omezující používání sociálních sítí dětmi v zájmu jejich bezpečí na internetu. Prohlásila to včera předsedkyně EK Ursula von der Leyenová, podle níž řada zemí Evropské unie volá po zavedení věkové hranice pro sociální sítě. EU částečně řeší bezpečnost dětí v digitálním prostředí v již platném nařízení o digitálních službách (DSA), podle německé političky to však není dostatečné a
… více »Multiplatformní open source aplikace scrcpy (Wikipedie) pro zrcadlení připojeného zařízení se systémem Android na desktopu a umožňující ovládání tohoto zařízení z desktopu, byla vydána v nové verzi 4.0.
Zdravim všechny.
Potřeboval bych poradit/postrčit, kde mám chybičku v malém scriptíčku. ((: .... >.<
Tady je:
<PRE>
#!/usr/bin/perl
use strict;
use warnings;
use Net::CIDR::Lite;
my $ipv4String='[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}';
if(defined $ARGV[0] && $ARGV[0] eq '-h'){
print "usage: $0
This script summarizes your IP classes (if possible). Input IPs with mask one per line. End with CTRL+D. Optionally,
redirect a file to stdin like so:
$0 < cidr =" Net::CIDR::Lite-">new;
while(<>){
if(/($ipv4String\/[0-9]{1,2})/){
my $item=$1;
$cidr->add($item);
}
else{
print "Ignoring previous line.\n";
}
}
my @cidr_list = $cidr->list;
print "======Aggregated IP list:======\n";
foreach my $item(@cidr_list){
print "$item\n";
}
Kdyz to spustim tak mi to píše tohle:
Bareword found where operator expected at ./summarisation.pl line 12, near "$0 < cidr =" Net::CIDR::Lite"
(Might be a runaway multi-line "" string starting on line 9)
(Missing operator before Net::CIDR::Lite?)
String found where operator expected at ./summarisation.pl line 24, near "print ""
(Might be a runaway multi-line "" string starting on line 20)
(Missing semicolon on previous line?)
String found where operator expected at ./summarisation.pl line 26, near "print ""
(Might be a runaway multi-line "" string starting on line 24)
(Missing semicolon on previous line?)
Backslash found where operator expected at ./summarisation.pl line 26, near "$item\"
(Missing operator before \?)
String found where operator expected at ./summarisation.pl line 26, at end of line
(Missing semicolon on previous line?)
syntax error at ./summarisation.pl line 12, near "$0 < cidr =" Net::CIDR::Lite"
Global symbol "$item" requires explicit package name at ./summarisation.pl line 26.
Can't find string terminator '"' anywhere before EOF at ./summarisation.pl line 26.
</PRE>
Předem děkuji
$0 < cidr =" Net::CIDR::Lite-">new;To má dělat to, že co vložíš z klávesnice po spustění scriptu přidá jako object new.
Podrobnosti zde: http://search.cpan.org/dist/Net-CIDR-Lite/Lite.pm
V perlu moc neumim, takže je možný že tam fakt někde chybí závorka či něco jinýho, akorát nejsem schopnej říct kde a co?
Takže jestli víš, budu rád když mi to prozradíš...
Díky
my $cidr = Net::CIDR::Lite->new;) hodit na samostatnou řádku, takhle nemáš vůbec proměnou $cidr definovanou. Tím zrušíš ten řádek, na který jses se tě ptal. Dobré taky bývá po zobrazení nápovědy skript ukončit.
Tiskni
Sdílej: