Ubuntu 27.04 bude Tenacious T-Rex.
Byla vydána nová verze 2026.4.0 "Never-slop" svobodného softwaru ScummVM (Wikipedie) umožňujícího bezproblémový běh mnoha klasických adventur na zařízeních, pro které nebyly nikdy určeny. Přehled novinek v poznámkách k vydání a na GitHubu. ScummVM oslavil 25 let. Verze 0.0.1 vyšla 8. října 2001.
Kanadský vývojář Anthony Sistilli vytvořil ironický DIY projekt parodující kamerové systémy Flock, s cílem názorně demonstrovat rizika masového sledování jaké provozují tyto komerční ALPR systémy. Z levné IP kamery a vlastního ML softwaru (napsaného s pomocí SI circa za 20 minut, kód se mi bohužel nepodařilo dohledat) běžícího v laptopu sestavil jednoduchý systém, který detekuje výhradně policejní vozidla, zaznamenává jejich SPZ a
… více »Část údajů uživatelů internetového supermarketu Rohlík byla odcizena. Kyberútočníci napadli nástroj zákaznické podpory Rohlíku, odcizili tak jména, e-mailové adresy, v některých případech také telefonní čísla nebo přepisy komunikace mezi klienty a zákaznickou podporou. Rohlík incident nahlásil příslušným orgánům a přijal příslušné opatření, aby zamezil podobným případům v budoucnosti, uvedla firma.
Aplikace eDoklady fungovala v obou volebních dnech stabilně a prakticky bez front. Digitální a informační agentura (DIA) odhaduje, že se digitálním dokladem prokázalo více než 100.000 voličů. Aplikaci si před volbami či během nich aktualizovalo 247.517 uživatelů. Nových registrací bylo 19.431 a do aplikace se přihlásilo 357.879 lidí. Největší nápor přišel bezprostředně po otevření volebních místností mezi 14. a 16. hodinou, kdy si
… více »Začal semestr, začal i podzim a kromě hub rostou jako po dešti i veřejné dílny v Praze. Nedávno strahováci referovali o hackerspacu Bordel, nyní se otevřela dílna Dejvice Lab jen kousek od ČVUT. Na blížící Virtuální Bastlírně tak uslyšíte nejen report z návštěvy dílny HWLab, ale i řadu novinek, událostí a úsměvných momentů, které se za poslední měsíc ve světě techniky, ale i vědy udály. Připojte se tedy již v úterý 13.10. od 20:00 a zapojte se do
… více »Byl vydán LineageOS 24 (Mastodon). LineageOS (Wikipedie) je svobodný operační systém pro chytré telefony, tablety a set-top boxy založený na Androidu. Jedná se o nástupce CyanogenModu. LineageOS 24 je založený na Androidu 17.
Společnost Valve publikovala na svém GitLabu nákresy a schémata zapojení headsetu Steam Frame. Pro nekomerční účely.
Soutěž Pwn2Own Ireland 2026 skončila 9. října. Bezpečnostní výzkumníci získali celkem 1 262 000 dolarů na odměnách. Během soutěže bylo předvedeno zneužití 98 zero-day zranitelností. Testování zahrnovalo různé kategorie zařízení a software. Výzkumníci předváděli prakticky fungující útoky podle pravidel soutěže. Výsledky následně slouží výrobcům při přípravě oprav. Mezi pokořenými jsou: Samsung Galaxy S26, OpenAI Codex, Oracle Autonomous AI Database, Google Pixel 10, u iPhone 17 neuspěli.
Programovací jazyk Python byl vydán v nové verzi 3.15.0. Podrobný přehled novinek v aktualizované dokumentaci.
AbcLinuxu.cz
ITBiz.cz
HDmag.cz
AbcPráce.cz
awk -F . '{ $ NUM = $1 }' Input
pro test existence pouzivam:
if [ ! -e *.o$NUM ]
then
echo ".o$NUM does not exist.";
fi
Prikazy samy o sobe funguji, ale nedari se mi predavat to cislo NUM. Asi to bude jen malickost, ale fakt na ni nemuzu prijit.
for num in $(cat file | sed -e 's/\..*//g')
do
if [ ! -e \*.o$num ]
then
echo "o$num does not exist"
fi
done
while read line
do
num="${line%%.*}"
if [ ! -e \*.o$num ]
then
echo "o$num does not exist"
fi
done < file
while read line
do
num="${line%%.*}"
files=*.o"$num"
if [ "$files" == "*.o$num" ]
then
echo "*.o$num does not exist"
fi
done < file
jinak
cat /usr/share/man/man1/test.1.gz | gunzip | grep "==" | wc
0 0 0
for num in $(cosik z nějakého souboru) Je blbě ať už to budete okecávat třeba týden.
cat file | sed nebudu plýtvat silami 
zo sirsieho pohladu je pouzivanie cat snad aj vyhodnejsie
cat file | sed' není absolutně nic špatného, to jen pár exhibicionistů má vždycky druhé vánoce, když mají příležitost na někoho dělat ramena, že je úplný blbec, pokud něco takového napíše. Osobně to používám celkem běžně, protože když před ten sed pak chci předřadit další filtr, je to podstatně jednodušší a to je pro mne při interaktivní práci podstatnější než mít orgasmus z jednoho ušetřeného catu…
<file sed méně čitelný, tak by jste si měl něco udělat s očima. Já do toho dokážu vložit filtr <file filter | sed úplně stejně snadno jako cat file | filter | sed do cat file | sed. Dokonce je to naprosto stejný počet znaků a do prakticky stejného místa.
in_filter="cat" in_filter="gunzip" in_filter="bunzip" < $in_file $in_filter | sed ...
<file sed' za krásně přehledný, nemusí ho proto za krásně přehledný považovat i zbytek světa. A že tedy není pravdou jeho fixní idea, že každý, kdo se na milimetr odchýlí od jeho Jedině Správného Řešení, je automaticky blbec, který tomu vůbec nerozumí.
Věřte nebo ne, při interaktivní práci je mi těch pár mikrosekund (i kdyby to byly milisekundy) navíc na "zbytečný" cat, který vám tak strašně leží v žaludku, naprosto ukradených. O několik řádů delší dobu bych totiž strávil tím, že bych upravoval verzi, kterou vy považujete za jedině správnou. Konstrukce '<file sed' pro mne přehledná není; pokud pro vás ano, klidně si ji používejte, nikdo vám v tom nebrání; vy nám ji, prosím, na oplátku nevnucujte jako jedině správný způsob. Až to budu potřebovat provést milionkrát ve smyčce, budu mít samozřejmě jiné priority - ale pak na to téměř jistě nepoužiju shellový skript.
"Cteni po radcich" ma nevyhodu, ze se precte blok dat, zjisti se konec radku, zavola se lseek() na konec radku a znova se precte blok dat (dalsi radek), pokud radky jsou male, zavola se read() daleko vicekrat nez v predchozim pripade.
rozdil je veliky pokud pouzivas systemove sluzby. Ovsem v nasem pripade i kdyz vypada, ze se nacte celej soubor do pameti, tak to neni. Vytvori se pipe, z jedne strany do ni cat cpe data v urcitych blocich (max jedna stranka) a sed si z pipy vycita taky v urcitych blocich.No a do tohodle místa je to stejné a pak se s tím děje co? Shell se to pokusí rozpársovat do příkazového řádku. Takže se mu to tam vůbec nemusí vejít a to je hned. No a pak tam máme to pársování. V tomhle případě to nevadí, protože v těch číslech mezera není, ale radši se tomu vyhnu, když můžu. Je fakt, že trojková verze bashe už má příkazovou řádku asi neomezenou (teda aspoň v konstrukci
for in se to tak jeví a do zdrojáku se mi koukat nechce). Nicméně se to do paměti natáhne celé a bash to zpracovává dost blbě.
"Cteni po radcich" ma nevyhodu, ze se precte blok dat, zjisti se konec radku, zavola se lseek() na konec radku a znova se precte blok dat (dalsi radek), pokud radky jsou male, zavola se read() daleko vicekrat nez v predchozim pripade.A sed čte taky po řádcích, ne? Takže v čem je rozdíl? Víc procesů, čekání navzájem na sebe ... O čem se tady vlastně bavím, když ten váš script prostě narozdíl od mého nefunguje
"Cteni po radcich" ma nevyhodu, ze se precte blok dat, zjisti se konec radku, zavola se lseek() na konec radku a znova se precte blok dat (dalsi radek), pokud radky jsou male, zavola se read() daleko vicekrat nez v predchozim pripade.Mohu vědět, kde se používá tahle implementace? Schválně jsem to zkusil v Pythonu:
for line in file('soubor'):
pass
Přičemž načítaný soubor má 500 řadků. A dle výpisu strace se řádky čtou takto:
open("soubor", O_RDONLY|O_LARGEFILE) = 3
fstat64(3, {st_mode=S_IFREG|0644, st_size=1000, ...}) = 0
fstat64(3, {st_mode=S_IFREG|0644, st_size=1000, ...}) = 0
mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7c82000
read(3, "a\na\na\na\na\na\na\na\na\na\na\na\na\na\na\na\n"..., 8192) = 1000
read(3, "", 4096) = 0
read(3, "", 8192) = 0
close(3) = 0
munmap(0xb7c82000, 4096) = 0
Soubor se čte po velkých blocích a nikde není žádný lseek(). Volání read() se vyskytuje pouze třikrát. Soubor se vejde do jednoho bufferu, takže by to asi stačilo jen jednou, ale rozhodně to není pětsetkrát.
read() volat na rozumně velké bloky.
$ echo -e 'uwehfuh\nihiuh\nhiuh' | while read i; do cat; done
ihiuh
hiuh
$ echo -e 'uwehfuh\nihiuh\nhiuh' | perl -ne 'system("cat")'
$
16.5.2006 11:13
Jakub Hájek | skóre: 14
| blog: zamek
| Praha
testu? ja bych ji nechal normalne expandovat na jmena souboru. Ale treba se mylim. A cutovat sedem mi prijde take trochu neobratne.
sed pouzivam proto, ze je univerzalnejsi nez cut a jsem zvykly ho pouzivat :)
16.5.2006 11:08
Jakub Hájek | skóre: 14
| blog: zamek
| Praha
NUM=`awk -F . '{ $NUM = $1; print $NUM; }' Input`
potom uz ten test bude znat promennou $NUM jako promennou shellu.
Ale asi bych se na ten awk vyprdnul a napsal to cele v shellu.
NUM=`cut -d. -f1 Input` if [ ! -e *.o$NUM ] then echo ".o$NUM does not exist." fi
16.5.2006 11:47
Jakub Hájek | skóre: 14
| blog: zamek
| Praha
#!/usr/bin/env python
import os, re
regexp = re.compile(r'(\d+)$')
files = {}
for f in os.listdir('.'):
try:
num = regexp.search(f).groups()[0]
try:
files[num].append(f)
except KeyError:
files[num] = [f]
except AttributeError:
pass
fr = open('Input')
for line in fr:
num, ext = os.path.splitext(line)
try:
print 'Soubory koncici na %s:' %num
for f in files[num]:
print " ", f
except KeyError:
print 'Zadne nebyly nalezeny'
Udělal jsem to trochu složitěji, jelikož jsem se chtěl vyhnout tomu, aby se obsah adresáře pokaždé znovu načítal. A taky když už to najde nějaké soubory končící na dané číslo, tak to vypíše jejich seznam.
perl -ne '/^(\d+)\./&&@{[<*.o$1>]}&&print"*.o$1 found\n"' InputA když si budu hrát na ukecance:perl -e '/\.o(\d+)$/&&push@{$h{$1}},$_ foreach<*>;$"=", ";/^(\d+)\./and$h{$1}&&print("$1: @{$h{$1}}\n")||print"$1: *.o$1 nenealezeny\n"while<>' InputP.S.: Ale jistě, jde to napsat i čitelně, ale to není taková sranda
Zatnul jsem zuby a spustil to. Doufám, že jsi mezi znaky nenaprogramoval backdoor.
perl -ne '/^(\d+)\./&&@{[<*.o$1>]}&&print"*.o$1 found\n"' Input
while (<>) {
/^(\d+)\./
&& @{ [<*.o$1>] }
&& print "*.o$1 found\n";
}
jedina menej bezna finta je pouzitie vlastnosti <>
foreach a while a pak taky lazy evaluation logické podmínky. V tom druhém případě jsem si ještě navíc pohrál s rozdílem priorit mezi and/or a &&/|| abych si ušetřil závorky a bylo to trochu víc nečitelné a pak je tam ještě takový trik s $" abych nemusel dělaj join. V tom prvním případě jsem musel ještě trošku znásilnit glob, abych ho měl v array contextu a pak ho hned zase dostal do scalar - počet výskytů. V čitelné podobě:
while (my $line = <>) {
my ($num) = ($line =~ m/^(\d+)\./);
if (defined $num) {
my @files = glob("*.o$num");
if (@files) {
print "*.o$num found\n";
}
}
}A to druhé
my %files;
foreach my $file (glob("*")) {
my ($num) = ($file =~ m/\.o(\d+)$/);
if (defined $num) {
if (not exists $files{$num}) {
$files{$num} = [];
}
my $filesArrayRef = $files{$num};
push @$filesArrayRef, $file;
}
}
while (my $line = <>) {
my ($num) = ($line =~ m/^(\d+)\./);
if (defined $num) {
if (ref $files{$num} eq 'ARRAY') {
print "$num: ", join(', ', @{$files{$num}}), "\n";
} else {
print "$num: *.o$num nenealezeny\n";
}
}
}No a pak stačí vědět, že je nějaké defaul proměnná, glob jde zapsat pomocí < a >, použít lazy evaluation, foreach a while jako postfix a v neposlední řadě, že použití neexistujícího klíče jako reference na pole nebo hash to pole nebo hash založí a celé se to krásně zjednoduší.
cat Input \ | sed -e 's/\([0-9]*\).*/ls *.o\1 >\/dev\/null 2>&1 || echo ".o\1 does not exists."/' \ | sh
cat Input \ | sed -e 's/\([0-9]*\).*/ls -d *.o\1 2>\/dev\/null | fgrep \1 || echo ".o\1 does not exists."/' \ | sh
export NUM. No a v prebehu zpracovani tim awk se k te promenne pristupuje takto environ["NUM"]
Tiskni
Sdílej:
