Všem čtenářkám a čtenářům AbcLinuxu krásné Vánoce.
Byla vydána nová verze 7.0 linuxové distribuce Parrot OS (Wikipedie). S kódovým názvem Echo. Jedná se o linuxovou distribuci založenou na Debianu a zaměřenou na penetrační testování, digitální forenzní analýzu, reverzní inženýrství, hacking, anonymitu nebo kryptografii. Přehled novinek v příspěvku na blogu.
Vývojáři postmarketOS vydali verzi 25.12 tohoto před osmi lety představeného operačního systému pro chytré telefony vycházejícího z optimalizovaného a nakonfigurovaného Alpine Linuxu s vlastními balíčky. Přehled novinek v příspěvku na blogu. Na výběr jsou 4 uživatelská rozhraní: GNOME Shell on Mobile, KDE Plasma Mobile, Phosh a Sxmo.
Byla vydána nová verze 0.41.0 multimediálního přehrávače mpv (Wikipedie) vycházejícího z přehrávačů MPlayer a mplayer2. Přehled novinek, změn a oprav na GitHubu. Požadován je FFmpeg 6.1 nebo novější a také libplacebo 6.338.2 nebo novější.
Byla vydána nová verze 5.5 (novinky) skriptovacího jazyka Lua (Wikipedie). Po pěti a půl letech od vydání verze 5.4.
Byla vydána nová verze 5.4.0 programu na úpravu digitálních fotografií darktable (Wikipedie). Z novinek lze vypíchnout vylepšenou podporu Waylandu. Nejnovější darktable by měl na Waylandu fungovat stejně dobře jako na X11.
Byla vydána beta verze Linux Mintu 22.3 s kódovým jménem Zena. Podrobnosti v přehledu novinek a poznámkách k vydání. Vypíchnout lze, že nástroj Systémová hlášení (System Reports) získal mnoho nových funkcí a byl přejmenován na Informace o systému (System Information). Linux Mint 22.3 bude podporován do roku 2029.
GNU Project Debugger aneb GDB byl vydán ve verzi 17.1. Podrobný přehled novinek v souboru NEWS.
Josef Průša oznámil zveřejnění kompletních CAD souborů rámů tiskáren Prusa CORE One a CORE One L. Nejsou vydány pod obecnou veřejnou licenci GNU ani Creative Commons ale pod novou licencí OCL neboli Open Community License. Ta nepovoluje prodávat kompletní tiskárny či remixy založené na těchto zdrojích.
Nový CEO Mozilla Corporation Anthony Enzor-DeMeo tento týden prohlásil, že by se Firefox měl vyvinout v moderní AI prohlížeč. Po bouřlivých diskusích na redditu ujistil, že v nastavení Firefoxu bude existovat volba pro zakázání všech AI funkcí.
Mám plain text:
AbcLinuxu.cz
ITBiz.cz
HDmag.cz
AbcPráce.cz
[Date.UTC(2014, 11, 23, 5, 12, 0, 0), 3],
[Date.UTC(2014, 11, 23, 5, 14, 0, 0), 3],
[Date.UTC(2014, 11, 23, 5, 16, 0, 0), 2],
[Date.UTC(2014, 11, 23, 5, 18, 0, 0), 2],
[Date.UTC(2014, 11, 23, 5, 20, 0, 0), 2],
[Date.UTC(2014, 11, 23, 5, 22, 0, 0), 2],
[Date.UTC(2014, 11, 23, 5, 24, 0, 0), 2],
[Date.UTC(2014, 11, 23, 5, 26, 0, 0), 2],
[Date.UTC(2014, 11, 23, 5, 28, 0, 0), 1],
[Date.UTC(2014, 11, 23, 5, 30, 0, 0), 1],
[Date.UTC(2014, 11, 23, 5, 32, 0, 0), 1],
[Date.UTC(2014, 11, 23, 5, 34, 0, 0), 1],
[Date.UTC(2014, 11, 23, 5, 36, 0, 0), 1],
[Date.UTC(2014, 11, 23, 5, 38, 0, 0), 1],
[Date.UTC(2014, 11, 23, 5, 40, 0, 0), 0],
A potřeboval bych odstranit řádky výše zvýrazněné kurzívou, aby to vypadalo takto:
[Date.UTC(2014, 11, 23, 5, 12, 0, 0), 3],
[Date.UTC(2014, 11, 23, 5, 14, 0, 0), 3],
[Date.UTC(2014, 11, 23, 5, 16, 0, 0), 2],
[Date.UTC(2014, 11, 23, 5, 26, 0, 0), 2],
[Date.UTC(2014, 11, 23, 5, 28, 0, 0), 1],
[Date.UTC(2014, 11, 23, 5, 38, 0, 0), 1],
[Date.UTC(2014, 11, 23, 5, 40, 0, 0), 0],
Konkrétně potřebuji porovnávat poslední číselný údaj a v případě souvislého opakování ponechat pouze první a poslední záznam.
Dá se to relativně jednoduše zvládnout pomocí sed či awk? Pokud ne, asi bych to řešil mechanicky v bashi (načítání řádků, porovnávání hodnoty, vymazání nadbytečného řádku a pořád dokola, dokud bude co mazat).
Řešení dotazu:
cat soubor | sort -k8 -u -r >soubor1 tac soubor | sort -k8 -u -r >soubor2 #paste -d '\n' soubor1 soubor2 >vysledek paste -d '\n' soubor1 soubor2 | uniq >vysledek
On ten plain text má stovky kB a číselný údaj v posl. sloupci se pohybuje mezi 0 - 5, střídavě nahoru a dolu. "unique" to pročistí tak důkladně, že z těch stovek kB zbude pár řádků.
3.1.2015 02:39
wamba | skóre: 38
| blog: wamba
perl -00 -pe 's/(\N* (\d+)\],\n).*\n(\N* \2\],\n)/$1$3/msg'
3.1.2015 19:41
wamba | skóre: 38
| blog: wamba
perl -ne ' /(\d+)\],/; print $pred_radek if $1!=$pred or $pred2!=$pred; $pred2=$pred; $pred=$1; $pred_radek=$_'vytiskni řádek jestli se předešlý nebo následující řádek liší v čísle před
],
Ps. samozřejmě by bylo přehlednější napsat Perl script než tento "one-liner"
perl -ne ' /(\d+)\],/; print if 1..1; print $pred_radek if $1!=$pred or $pred2!=$pred; $pred2=$pred; $pred=$1; $pred_radek=$_'
5.1.2015 22:34
wamba | skóre: 38
| blog: wamba
0], jinak ho to tiskne, tak bych spíš doporučoval něco jako:
perl -ne 'BEGIN{$pred=-1}; /(\d+)\],/; print $pred_radek if $1!=$pred or $pred2!=$pred; $pred2=$pred; $pred=$1;$pred_radek=$_'
#
problém by ještě nastal kdyby "poslední" řádek nekončil \n, pak by se nevytiskl
sed -re 'H;x;/([0-9]+)\].*\1\]/d'
[Date.UTC(2014, 11, 25, 10, 36, 36, 0), 1],
[Date.UTC(2014, 11, 25, 10, 38, 38, 0), 1],
[Date.UTC(2014, 11, 25, 10, 40, 40, 0), 1],
[Date.UTC(2014, 11, 25, 10, 42, 42, 0), 1],
[Date.UTC(2014, 11, 25, 10, 44, 44, 0), 0],
[Date.UTC(2014, 11, 25, 10, 50, 50, 0), 0],
[Date.UTC(2014, 11, 25, 10, 52, 52, 0), 1],
[Date.UTC(2014, 11, 25, 10, 54, 54, 0), 0],
[Date.UTC(2014, 11, 25, 15, 42, 42, 0), 0],
[Date.UTC(2014, 11, 25, 15, 44, 44, 0), 1],
[Date.UTC(2014, 11, 25, 15, 46, 46, 0), 3],
[Date.UTC(2014, 11, 25, 10, 36, 36, 0), 1],
[Date.UTC(2014, 11, 25, 10, 42, 42, 0), 1],
[Date.UTC(2014, 11, 25, 10, 44, 44, 0), 0],
[Date.UTC(2014, 11, 25, 10, 50, 50, 0), 0],
[Date.UTC(2014, 11, 25, 10, 52, 52, 0), 1],
[Date.UTC(2014, 11, 25, 10, 52, 52, 0), 1],
[Date.UTC(2014, 11, 25, 10, 54, 54, 0), 0],
[Date.UTC(2014, 11, 25, 15, 42, 42, 0), 0],
[Date.UTC(2014, 11, 25, 15, 44, 44, 0), 1],
[Date.UTC(2014, 11, 25, 15, 44, 44, 0), 1],
[Date.UTC(2014, 11, 25, 15, 46, 46, 0), 3],
Tiskni
Sdílej:
