Byla vydána (𝕏) nová verze 24.7 open source firewallové a routovací platformy OPNsense (Wikipedie). Jedná se o fork pfSense postavený na FreeBSD. Kódový název OPNsense 24.7 je Thriving Tiger. Přehled novinek v příspěvku na fóru.
Binarly REsearch upozorňuje na bezpečnostní problém PKFail (YouTube) v ekosystému UEFI. Stovky modelů zařízení používají pro Secure Boot testovací Platform Key vygenerovaný American Megatrends International (AMI) a jeho privátní část byla při úniku dat prozrazena. Do milionů zařízení (seznam v pdf) po celém světě tak útočníci mohou do Secure Bootu vložit podepsaný malware. Otestovat firmware si lze na stránce pk.fail. Ukázka PoC na Linuxu na Windows na YouTube.
Mobilní operační systém /e/OS (Wikipedie) založený na Androidu / LineageOS, ale bez aplikací a služeb od Googlu, byl vydán ve verzi 2.2 (Mastodon, 𝕏). Přehled novinek na GitLabu. Vypíchnuta je rodičovská kontrola.
Společnost OpenAI představila vyhledávač SearchGPT propojující OpenAI modely umělé inteligence a informace z webů v reálném čase. Zatím jako prototyp pro vybrané uživatele. Zapsat se lze do pořadníku čekatelů.
Distribuce Linux Mint 22 „Wilma“ byla vydána. Je založená na Ubuntu 24.04 LTS, ale s desktopovým prostředím Cinnamon (aktuálně verze 6.2), příp. MATE nebo Xfce, balíkem aplikací XApp, integrací balíčků Flatpak a dalšími změnami. Více v přehledu novinek a poznámkách k vydání.
Příspěvek na blogu Truffle Security: Kdokoli může přistupovat ke smazaným a privátním repozitářům na GitHubu.
Byla vydána nová verze 14 integrovaného vývojového prostředí (IDE) Qt Creator. Podrobný přehled novinek v cgitu. Vypíchnout lze podporu rozšíření v Lua.
Byla vydána verze 1.80.0 programovacího jazyka Rust (Wikipedie). Podrobnosti v poznámkách k vydání. Vyzkoušet Rust lze například na stránce Rust by Example.
Apple oznámil, že v beta verzi spustil své Apple Maps na webu. Podporován je také webový prohlížeč Chrome. Ne však na Linuxu.
Portál Stack Overflow po roce opět vyzpovídal své uživatele, jedná se především o vývojáře softwaru, a zveřejnil detailní výsledky průzkumu. Průzkumu se letos zúčastnilo více než 65 tisíc vývojářů. Z Česka jich bylo 710. Ze Slovenska 246.
A to jsem se poté, co jsem o weekendu dopsal Perl2RPM zapřísáhl, že v tak blbém jazyce, jako je Perl, už nikdy nic psát nebudu...
Je třeba předefinovat (subclassovat) pomocný objekt filer. Uprav si regulární výraz k obrazu svému. Uvedená verze dělá z blabla.tar.gz -> blabla.tar.gz-1, takže se to v ls alespoń řadí pěkně za sebe. Tebou navrhované blabla.tar-1.gz je podle mne kravina (předtím to dělalo blabla-1.tar.gz)
#!/usr/bin/perl use MIME::Parser; use Mail::Util qw( read_mbox ); { package MIME::Parser::Filer::Foobar; use base 'MIME::Parser::Filer'; sub find_unused_path { my( $self, $dir, $fname ) = @_; my $i = 0; while ( 1 ) { my $suffix = ( $i ? "-$i" : "" ); my $sname = $fname; # XXX tohle je zapotrebi upravit k obrazu svemu XXX #$sname =~ s/^(.*?)(\.|\Z)/$1$suffix$2/; $sname =~ s/\Z/$suffix/; my $path = File::Spec->catfile( $dir, $sname ); if ( !-e $path ) { $i and $self->whine( "collision with $fname in $dir: using $path" ); return $path; } $self->debug( "$path already taken" ); } continue { ++$i } } } my $filer = MIME::Parser::Filer::Foobar->new( '.' ); my $parser = new MIME::Parser; $parser->filer( $filer ); foreach my $f ( @ARGV ) { my @list = read_mbox( $f ); @list = map { join '', @{$_} } @list; map { $parser->parse_data( $_ ) if $_ } @list; }
There Is More Than One Way To Do It je naopak skvela myslenka, ktera by mela platit vsude. Samozrejme, pokud jazyk neumis dokonale, ale kopirujes jen cizi kusy kodu, ktery lepis dohromady, tak se v tom nevyznas a nepochopis to Perl se musis opravdu naucit, abys v nem mohl programovat.
Muzes poslat nejaky priklad? To by me fakt zajimalo.
#!/usr/bin/perl -w print "before\n"; { local $SIG{__WARN__} = sub { print "$$ dying!\n"; die @_ }; eval {system 'neexistujici binarka' }; } print "$$ is alive!\n"; if ( $@ ) { print STDERR "eval failed\n"; exit 1; } print "after\n";měl vypsat (číslo je PID, takže se mění)?
before 13928 dying! 13928 is alive! eval failed 13928 is alive! aftersprintf "%d" (nebo s %f) občas vrátí prázdný řetězec. blbě se to reprodukuje, stalo se nám to vždy jen při zpracování 10000 dat, když se z ničeho nic na výstupu neobjevovala nějaká čísla, když ve vstupních datech byla. stačí?
Mozna bych to ale pustil pres sprintf("%04i",$i), protoze razeni by slo ...-1, ...-10, ...-100, ...-2 ... coz je dost trapny razeni
for i in `ls`;do
použít for i in *;do
?
Tiskni
Sdílej: