Byla vydána verze 0.2.0 v Rustu napsaného frameworku Pingora pro vytváření rychlých, spolehlivých a programovatelných síťových systémů. Společnost Cloudflare jej letos v únoru uvolnila pod licencí Apache 2.0.
Open source RDP (Remote Desktop Protocol) server xrdp (Wikipedie) byl vydán ve verzi 0.10.0. Z novinek je vypíchnuta podpora GFX (Graphic Pipeline Extension). Nová větev řeší také několik bezpečnostních chyb.
Rocky Linux byl vydán v nové stabilní verzi 9.4. Přehled novinek v poznámkách k vydání.
Dellu byla odcizena databáze zákazníků (jméno, adresa, seznam zakoupených produktů) [Customer Care, Bleeping Computer].
V lednu byl otevřen editor kódů Zed od autorů editoru Atom a Tree-sitter. Tenkrát běžel pouze na macOS. Byl napevno svázán s Metalem. Situace se ale postupně mění. V aktuálním příspěvku Kdy Zed na Linuxu? na blogu Zedu vývojáři popisují aktuální stav. Blíží se alfa verze.
O víkendu 11. a 12. května lze navštívit Maker Faire Prague, festival plný workshopů, interaktivních činností a především nadšených a zvídavých lidí.
Byl vydán Fedora Asahi Remix 40, tj. linuxová distribuce pro Apple Silicon vycházející z Fedora Linuxu 40.
Představena byla služba Raspberry Pi Connect usnadňující vzdálený grafický přístup k vašim Raspberry Pi z webového prohlížeče. Odkudkoli. Zdarma. Zatím v beta verzi. Detaily v dokumentaci.
Byla vydána verze R14.1.2 desktopového prostředí Trinity Desktop Environment (TDE, fork KDE 3.5). Přehled novinek v poznámkách k vydání, podrobnosti v seznamu změn.
Dnešním dnem lze již také v Česku nakupovat na Google Store (telefony a sluchátka Google Pixel).
for $no ( 1 .. (počet znaků v proměnný $_) ) { push @sopts, $_; # ale $_ donutit tisknout jen $no-tej znak }Nebo že by se to dalo udělat pomocí regexpu? To ale nevím, nic mě nenapadlo...
No, není to žádný zázrak, ale mělo by to fungovat:
#!/usr/bin/perl -w my @attrib = (); my $i = 0; $attributy = $ARGV[0]; $attributy =~ s/^\-//; $length = length($attributy); while ($i < $length){ $attrib[$i] = "-" . substr($attributy, $i++, 1); print "attrib $i = $attrib[$i]\n"; }
Odborníky na PERL prosím o shovívavost ...
$aaa="-abc"; while ($aaa) { push (@uuu, chop $aaa); }a v poli
@uuu
mas vsechny znaky z $aaa
vcetne podtrzitka v opacnem poradi.
length(řetězec)
. Získání podřetězce z řetězce dělá funkce substr(řetězec, start, kolik)
. Pomocí regexpu by to šlo také, ale zbytečně složitě a neefektivně.
Nevím, jestli je dobré učit se programovat zrovna na Perlu…Líbí se mi
Funkce vracející délku řetezce je length(řetězec)
.
A já vůl zkoušel lenght. Furt se mi to plete
Všem: díky za odpovědi
Zkoušel a Perl už IMHO vůbec nejde dohromady Nechci nikoho podceňovat, ale myslím, že nejde metodou pokus–omyl přijít na to, žeNevím, jestli je dobré učit se programovat zrovna na Perlu…Líbí se mi … A já zkoušel lenght. Furt se mi to plete
$_
je implicitní prostor pro vstup, výstup a vyhledávání, $,
je výstupní oddělovač polí, @_
jsou parametry podprogramu, %ENV
jsou proměnné prostředí atd. atp. Aspoň referenční manuál by to chtělo Taky můžu doporučit knížku Perl pro zelenáče od Pavla Satrapy (a to nejenom pro zelenáče ).
Mně se Perl taky líbil, ale když jsem se po nějaké době k nějakému skriptu vrátil, zjistil jsem, že Perl je write-only Pak jsem napsal skoroprogram, který obsahoval třeba toto:
foreach $prom (sort(keys(%{$zdroje{$jmeno}}))) { if ((substr($prom,0,1) eq '') || (substr($prom,0,1) !~ /^\w/i)) { print SPECIALNI "<h3 class='promenna'>$prom</h3>\n"; $text = $zdroje{$jmeno}{$prom}; do { $REcount = ($text =~ s/\?\{([^}:]*)\}/&_nahraditGlobals($1)/ge); $REcount += ($text =~ s/\?\{([^}:]*):([^{}]*(?:(?:\$|\*)\{[^{}]*(?:\*\{[^}]*\}[^{}]*)*[^{}]*\}[^{}]*)*[^{}]*)\}/&_nahraditGlobalsParametr($1,$2,$blok)/ge); } while ($REcount > 0); $text =~ s/(\$\{[^}:]*\})/<span class='vypisPromenne'>$1<\/span>/g; $text =~ s/(\$\{[^}:]*:[^{}]*(?:\*\{[^}]*\}[^}]*)*\})/<span class='vypisPromenne'>$1<\/span>/g; print SPECIALNI $text; } else …A to byla poslední věc, kterou jsem v Perlu napsal
[ivok@zero ~]$ perl -e 'print join " -", split //, "-abc"; print "\n"' - -a -b -c
split
na to, abych dostal celý řetězec, by byla blbost
Teď už zbývá jen nějak logicky zdůvodnit, proč v Javě, která IMHO vede naopak k tomu psát čitelné programy (ale někteří se úspěšně brání ) se String.split("")
chová úplně stejně, a to bez jakékoliv zmínky v dokumentaci. Asi to bude tím, že programátor v Javě neuvidí žádnou výhodu v tom, že může cyklus přepsat do jednoho řádku programu a nenapadne ho zkoušet, jak se rozdělí řetězec, když se má dělit v místě, kde je nic
Pro Davida: to, co předvedl ivok, je myslím to správné perlovské řešení (přestože Perl se chlubí tím, že každá věc jde napsat mnoha způsoby). Takže pokud se chcete naučet přemýšlet o tom, jak sestavovat algoritmy, Perlu bych se zatím vyhnul. Pokud se naopak chcete naučit přemýšlet jako hacker (v původním smyslu slova), s minimem nástrojů dosahovat maximálních výsledků a nástroje používat ne zrovna obvyklým způsobem (ale přesto elegantně), je Perl ta pravá volba.
Pokud se naopak chcete naučit přemýšlet jako hacker (v původním smyslu slova), s minimem nástrojů dosahovat maximálních výsledků a nástroje používat ne zrovna obvyklým způsobem (ale přesto elegantně), je Perl ta pravá volba.That's what I'm talkin' about, yo
['-'+x for x in '-abc'[1:]]
Tiskni Sdílej: