Zemřel Rob Grant, spolutvůrce kultovního sci-fi seriálu Červený trpaslík.
Apple oznámil, že iPhone a iPad jako první a jediná zařízení pro koncové uživatele splňují požadavky členských států NATO na zabezpečení informací. Díky tomu je možné je používat pro práci s utajovanými informacemi až do stupně „NATO Restricted“, a to bez nutnosti instalovat speciální software nebo měnit nastavení. Žádné jiné běžně dostupné mobilní zařízení tak vysokou úroveň státní certifikace dosud nezískalo.
Americký provozovatel streamovací platformy Netflix odmítl zvýšit nabídku na převzetí filmových studií a streamovací divize konglomerátu Warner Bros. Discovery (WBD). Netflix to ve čtvrtek oznámil v tiskové zprávě. Jeho krok po několikaměsíčním boji o převzetí otevírá dveře k akvizici WBD mediální skupině Paramount Skydance, a to zhruba za 111 miliard dolarů (2,28 bilionu Kč).
Americká společnosti Apple přesune část výroby svého malého stolního počítače Mac mini z Asie do Spojených států. Výroba v závodě v Houstonu by měla začít ještě v letošním roce, uvedla firma na svém webu. Apple také plánuje rozšířit svůj závod v Houstonu o nové školicí centrum pro pokročilou výrobu. V Houstonu by měly vzniknout tisíce nových pracovních míst.
Vědci Biotechnologické společnosti Cortical Labs vytvořili biopočítač nazvaný CL1, který využívá živé lidské mozkové buňky vypěstované z kmenových buněk na čipu. Po úspěchu se hrou PONG se ho nyní snaží naučit hrát DOOM. Neurony přijímají signály podle toho, co se ve hře děje, a jejich reakce jsou převáděny na akce jako pohyb nebo střelba. V tuto chvíli systém hraje velmi špatně, ale dokáže reagovat, trochu se učit a v reálném čase se hrou
… více »Pro testování byl vydán 4. snapshot Ubuntu 26.04 LTS (Resolute Raccoon).
Ben Sturmfels oznámil vydání MediaGoblinu 0.15.0. Přehled novinek v poznámkách k vydání. MediaGoblin (Wikipedie) je svobodná multimediální publikační platforma a decentralizovaná alternativa ke službám jako Flickr, YouTube, SoundCloud atd. Ukázka například na LibrePlanet.
TerminalPhone (png) je skript v Bashi pro push-to-talk hlasovou a textovou komunikaci přes Tor využívající .onion adresy.
Před dvěma lety zavedli operátoři ochranu proti podvrženým hovorům, kdy volající falšuje čísla anebo se vydává za někoho jiného. Nyní v roce 2026 blokují operátoři díky nasazeným technologiím v průměru 3 miliony pokusů o podvodný hovor měsíčně (tzn., že k propojení na zákazníka vůbec nedojde). Ochrana před tzv. spoofingem je pro zákazníky a zákaznice všech tří operátorů zdarma, ať už jde o mobilní čísla nebo pevné linky.
Společnost Meta (Facebook) předává React, React Native a související projekty jako JSX nadaci React Foundation patřící pod Linux Foundation. Zakládajícími členy React Foundation jsou Amazon, Callstack, Expo, Huawei, Meta, Microsoft, Software Mansion a Vercel.
Asi by se slušelo na začátek vysvětlit, co je PERL vlastně zač. Je to skriptovací programovací jazyk, jehož "otcem" je Larry Wall. Původně byl určen pro práci s textem. Evoluce, která na PERL nezapomněla, z něho vytvořila mocný programovací jazyk použitelný téměř na cokoli. Syntaxí je velice podobný Céčku, proto pro Céčkaře nebude problém si tento jazyk velice rychle osvojit. Perl se dá použít na psaní webových aplikací, práci s textem, automatizačních nástrojů pro Linux, psaní síťových nástrojů a podobně. Vzhledem k tomu, že se bavíme o skriptovém jazyku, nebude problém s kompatibilitou aplikací, pokud bude stroj osazen interpretem jazyka.
První program, který se píše ve všech jazycích, je program "hello world".
#!/usr/bin/perl
|
První řádek říká, jaký intepret se má pro spuštění skriptu použít. Samotný # se používá pro psaní komentářů, vše od tohoto znaku do konce řádky perl ignoruje. Pro výpis se dá použít několik příkazů, buď céčkovský printf nebo prostý print.
Syntaxe:
print [kam] "výpis" ;
|
Pokud vynecháte [kam], použije se STDOUT.
printf ("text a odkazy na proměnné",seznam proměnných);
|
Teď jsme schopni něco vypsat, ale vypisovat statické texty je málo, budeme potřebovat nějaké proměnné. Filozofie proměnných je v perlu zcela odlišná například od Céčka. Máme jen tři typy proměnných: skalár, pole a hash. Ani deklarace proměnných není potřeba, prvním použitím se proměnné deklarují samy.
Do skalární proměnné (označuje se $ před názvem) můžeme uložit "libovolně" dlouhý text nebo čísla. Pokud budeme chtít spočítat třeba nákup, tak napíšeme:
#!/usr/bin/perl
|
Perl se v tomto případě pokouší vše od začátku proměnné až k prvnímu písmenu brát jako číslici a jako s takovou s ní i zachází.
Dalším datovým typem je pole (více skalárních proměnných v jedné, na jednotlivé prvky se odkazujeme indexem), které se jako celek označuje @. Prvky pole se označují $název_pole[5]. Pokud zadáme jako index -1, bude to znamenat poslední prvek. První prvek se skrývá pod indexem 0. Pole lze plnit po jednom prvku nebo následujícím přiřazením:
@pole=(seznam hodnot);
|
Třetím typem jsou hashe (asociativní seznamy). Volně se dají přirovnat k polím, jen se na jejich prvky místo indexem odkazujeme pomocí jejich názvů. Označují se % před názvem, opět se k jednotlivým prvkům přistupuje přes $NAZEV{'jmeno_prvku'}. Plní se následujícím postupem:
#!/usr/bin/perl
|
Většinou je třeba přijímat data od uživatele. To můžeme pomocí parametrů při spuštění nebo ze souboru či klávesnice (ta je taky soubor - STDIN) za chodu programu. Uvedu nejprve třetí možnost a postupně se dopracuji k ostatním. Načtení řetězce z klávesnice (i souboru) se provádí prostým přiřazením:
$my_string=<ovladač_souboru>;
|
- u klávesnice se používá STDIN nebo se ovladač neuvede.
Ze souboru je to stejné, jen je třeba soubor nejprve otevřít. K tomu slouží následující kód:
#!/usr/bin/perl
|
Za příkaz open se píše název ovladače souboru (slušňáci ho píší velkými písmeny), po kterém následuje v "" název souboru s právy, se kterými se má otevřít. Následně ho celý uloží do pole, kde každý prvek je jeden řádek souboru. Po použití je třeba soubor zavřít, k tomu slouží příkaz close, jehož parametrem je ovladač souboru.
AbcLinuxu.cz
ITBiz.cz
HDmag.cz
AbcPráce.cz
soubor - otevře soubor pro čtení>soubor - otevře soubor s právy pro zápis, pokud je to nutné, tak ho vytvoří>>soubor - přidávání dat na konec existujícího souboru+<soubor - otevře soubor s právy pro čtení a zápis+>soubor - smaže obsah starého souboru, nebo vytvoří nový s právy pro čtení a zápisTřetím možným způsobem jak programu předat data, je pomocí jeho argumentů. Ty se uloží do pole s názvem @ARGV. Počet parametů (prvků pole) se získává pomocí příkazu scalar @ARGV.
Na závěr prvního dílu uvedu takový malý seznam funkcí pro práci s poli, hashi a skaláry. V příštím díle nás čekají příkazy cyklů, podmínky, práce se soubory a podobně.
chomp seznam; - odstraňuje konce řádků ze všech prvků seznamu, vrací počet odstraněných znakůchop seznam; - odebere poslední znak ze všech prvků, vrací jejich početlc výraz; - vrací výraz s malými písmenylcfirst výraz; - vrací výraz, s prvním malým písmenemlength výraz; - vrací délku výrazu v bajtech.uc výraz; - vrací výraz s velkými písmenyucfirst výraz; - vrací výraz, s prvním velkým písmenemcrypt řetězec, základ; - zakóduje řetězec pomocí základudelete $hash{'jméno_prvku'}; - smaže zadanou hodnotu z hasheexists výraz; - kontroluje, jestli se prvek nachází v hashikeys %hash; - v seznamovém kontextu vrací seznam prvků hashe, ve skalárním jejich početvalues %hash; - vrací seznam všech hodnot hashescalar @pole; - vrací počet prvků polesplit [vzorek[,výraz[,limit]]]; - rozdělí výraz podle zadaného vzorku, pokud je zadán limit, dělí ho na na tento maximální počet políNástroje: Tisk bez diskuse
Tiskni
Sdílej:
teprve tento článek mě zavedl na cestu k perlu
Tak to možná neměl vůbec vyjít... hlavní sílou Perlu je, že spoustu věcí nemusíš psát a on interpret odhadne, cos asi tak mohl chtít ... což je zároveň jeden z jeho největších problémů a důvod, proč by v něm neměl psát možná nikdo, ale zejména ne začátečníci. Svádí to k nesrozumitelnému a nevyzpytatelně se chovajícímu kódu (malinkou ukázkou je i uvedený výpočet ceny nákupu, kde se spoléhá na to, že se při aritmetické operaci provede konverze na číslo, čímž se zahodí jednotky -- Američanovi, který napíše $15, by to z ničeho nic nefungovalo...).
().