abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
AbcLinuxu hledá autory!
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
    dnes 01:33 | Zajímavý projekt

    Singularity je rootkit ve formě jaderného modulu (Linux Kernel Module), s otevřeným zdrojovým kódem dostupným pod licencí MIT. Tento rootkit je určený pro moderní linuxová jádra 6.x a poskytuje své 'komplexní skryté funkce' prostřednictvím hookingu systémových volání pomocí ftrace. Pro nadšence je k dispozici podrobnější popis rootkitu na blogu autora, případně v článku na LWN.net. Projekt je zamýšlen jako pomůcka pro bezpečnostní experty a výzkumníky, takže instalujte pouze na vlastní nebezpečí a raději pouze do vlastních strojů 😉.

    NUKE GAZA! 🎆 | Komentářů: 0
    včera 21:22 | Zajímavý projekt

    Iconify je seznam a galerie kolekcí vektorových open-source ikon, ke stažení je přes 275000 ikon z více jak dvou set sad. Tento rovněž open-source projekt dává vývojářům k dispozici i API pro snadnou integraci svobodných ikon do jejich projektů.

    NUKE GAZA! 🎆 | Komentářů: 0
    včera 03:33 | IT novinky

    Dle plánu certifikační autorita Let's Encrypt nově vydává také certifikáty s šestidenní platností (160 hodin) s možností vystavit je na IP adresu.

    Ladislav Hagara | Komentářů: 7
    17.1. 14:44 | Nová verze

    V programovacím jazyce Go naprogramovaná webová aplikace pro spolupráci na zdrojových kódech pomocí gitu Forgejo byla vydána ve verzi 14.0 (Mastodon). Forgejo je fork Gitei.

    Ladislav Hagara | Komentářů: 3
    17.1. 13:11 | Zajímavý projekt

    Just the Browser je projekt, 'který vám pomůže v internetovém prohlížeči deaktivovat funkce umělé inteligence, telemetrii, sponzorovaný obsah, integraci produktů a další nepříjemnosti' (repozitář na GitHubu). Využívá k tomu skrytá nastavení ve webových prohlížečích, určená původně pro firmy a organizace ('enterprise policies'). Pod linuxem je skriptem pro automatickou úpravu nastavení prozatím podporován pouze prohlížeč Firefox.

    NUKE GAZA! 🎆 | Komentářů: 3
    16.1. 16:44 | Nová verze

    Svobodný multiplatformní herní engine Bevy napsaný v Rustu byl vydán ve verzi 0.18. Díky 174 přispěvatelům.

    Ladislav Hagara | Komentářů: 2
    16.1. 15:11 | IT novinky

    Miliardy korun na digitalizaci služeb státu nestačily. Stát do ní v letech 2020 až 2024 vložil víc než 50 miliard korun, ale původní cíl se nepodařilo splnit. Od loňského února měly být služby státu plně digitalizované a občané měli mít právo komunikovat se státem digitálně. Do tohoto data se povedlo plně digitalizovat 18 procent agendových služeb státu. Dnes to uvedl Nejvyšší kontrolní úřad (NKÚ) v souhrnné zprávě o stavu digitalizace v Česku. Zpráva vychází z výsledků víc než 50 kontrol, které NKÚ v posledních pěti letech v tomto oboru uskutečnil.

    Ladislav Hagara | Komentářů: 25
    16.1. 13:55 | IT novinky

    Nadace Wikimedia, která je provozovatelem internetové encyklopedie Wikipedia, oznámila u příležitosti 25. výročí vzniku encyklopedie nové licenční dohody s firmami vyvíjejícími umělou inteligenci (AI). Mezi partnery encyklopedie tak nově patří Microsoft, Amazon a Meta Platforms, ale také start-up Perplexity a francouzská společnost Mistral AI. Wikimedia má podobnou dohodu od roku 2022 také se společností Google ze skupiny

    … více »
    Ladislav Hagara | Komentářů: 0
    16.1. 02:22 | Nová verze

    D7VK byl vydán ve verzi 1.2. Jedná se o fork DXVK implementující překlad volání Direct3D 5, 6 a 7 na Vulkan. DXVK zvládá Direct3D 8, 9, 10 a 11.

    Ladislav Hagara | Komentářů: 0
    16.1. 02:00 | Nová verze

    Byla vydána verze 12.0.0 knihovny libvirt (Wikipedie) zastřešující různé virtualizační technologie a vytvářející jednotné rozhraní pro správu virtuálních strojů. Současně byl ve verzi 12.0.0 vydán související modul pro Python libvirt-python. Přehled novinek v poznámkách k vydání.

    Ladislav Hagara | Komentářů: 0
    Které desktopové prostředí na Linuxu používáte?
     (18%)
     (5%)
     (0%)
     (9%)
     (19%)
     (3%)
     (6%)
     (2%)
     (11%)
     (39%)
    Celkem 509 hlasů
     Komentářů: 14, poslední včera 10:22
    Rozcestník

    Programujeme v PERLu - I

    6. 1. 2004 | Jindřich Skupa | Programování | 21847×

    Dvoudílný článek vás provede základními principy práce s tímto univerzálním skriptovacím jazykem.

    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
    print "Hello world \n";
    printf ("Hello world \n");

    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
    $cena="15Kč";
    $mnozstvi="3kg";
    $celkovácena=$cena*$mnozstvi;
    print "$celkovacena";

    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
    %HASH=('FIRST',"prvni",'SECOND',"druhy",'THIRD',"třeti");
    #%HASH=('FIRST=>"prvni",'SECOND'=>"druhy",'THIRD'=>"třeti"); - druhý způsob plnění hashe

    print "$HASH{'FIRST'}\n";
    print "$HASH{'SECOND'}\n";
    print "$HASH{'THIRD'}\n";

    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

    open SOUBOR,"soubor.fil";
    @file=<SOUBOR>;
    print "@file";
    close SOUBOR;

    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.

    Režimy otevírání souborů

    • 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ápis

    Tř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ě.

    Funkce řetězců

    • 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čet
    • lc výraz; - vrací výraz s malými písmeny
    • lcfirst výraz; - vrací výraz, s prvním malým písmenem
    • length výraz; - vrací délku výrazu v bajtech.
    • uc výraz; - vrací výraz s velkými písmeny
    • ucfirst výraz; - vrací výraz, s prvním velkým písmenem
    • crypt řetězec, základ; - zakóduje řetězec pomocí základu

    Funkce polí a hashů

    • delete $hash{'jméno_prvku'}; - smaže zadanou hodnotu z hashe
    • exists výraz; - kontroluje, jestli se prvek nachází v hashi
    • keys %hash; - v seznamovém kontextu vrací seznam prvků hashe, ve skalárním jejich počet
    • values %hash; - vrací seznam všech hodnot hashe
    • scalar @pole; - vrací počet prvků pole
    • split [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í
           

    Hodnocení: 38 %

            špatnédobré        

    Nástroje: Tisk bez diskuse

    Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

    Komentáře

    Vložit další komentář

    6.1.2004 09:50 b0rmann | skóre: 15 | Pardubice
    Rozbalit Rozbalit vše print [kam],
    Spatne.
    Dve chyby v popisu syntaxe tak primitivni funkce jako print je nejak moc.
    Filehandler od pole (ne skalaru!) carkou se neotdeluje.

    (duveruhodny zdroj: perldoc -f print)
    --- Gott strafe Amerika
    6.1.2004 12:02 Lukáš Zapletal | skóre: 42 | blog: lzapův svět | Olomouc
    Rozbalit Rozbalit vše print [kam],
    To se snad nemusi dokazovat to je jasne, ze to nefunguje s carkou :) Typicka chyba zacatecnika :)))
    6.1.2004 12:16 Kraus
    Rozbalit Rozbalit vše print [kam],
    Jen když to někdo zkušený dovede takto pěkně odhalit.
    6.1.2004 12:25 David Olszyński
    Rozbalit Rozbalit vše Skoda casu a penez
    Takovych clanku uz bylo hodne. Mnohe dokonce i v cestine a mnohe i lepsi nez print [kam] "výpis" ;
    6.1.2004 16:49 honza
    Rozbalit Rozbalit vše Skoda casu a penez
    Citim z vaseho prispevku volani po kvalite a ne po kvantite a svobode? Mily zlaty, to jste asi ve spatnem filmu. Seznamte se prosim ze zakladnimi dily pana Stallmana. V jeho filosofii se nikde nehovori o kvalite. Nebo clanky ceskych free-apostolu napr. pan Hanke (viz zive). My o free HOVORIME. Vzpamatujte se proboha.
    7.1.2004 19:12 Skupa Jindra
    Rozbalit Rozbalit vše Skoda casu a penez
    Psal jsem to pro zacatecniky tak aby to dobre pochopili. Pokud jsi "starej perlar" tak si myslim ze nemas ani potrebu cist tenhle clanek. Pokud jsi neznaly veci tak ti to takhle staci a myslim si ze v tom clanku bylo mnohem vic informaci nez jak se vypisuje.
    7.1.2004 10:35 cartman | skóre: 22
    Rozbalit Rozbalit vše paranoity.sk
    Dobry serial o perli najdete na paranoity.sk
    7.1.2004 19:23 mj
    Rozbalit Rozbalit vše Re: Dobry serial o perlu
    taky na LinuxZone a koukněte taky na PerlWiki :-)
    7.1.2004 19:31 Lumír Vonásek
    Rozbalit Rozbalit vše Prosté díky
    Velice díky, teprve tento článek mě zavedl na cestu k perlu. Polopatickým způsobem vysvětlené problémy, které nám, méně počítačově zdatným jedincům dodává sílu k dalšímu boji s PC. Takže z kritiky si nic nedělej kingu a jen tak dál!
    8.1.2004 09:55 unchallenger | skóre: 69 | blog: unchallenger
    Rozbalit Rozbalit vše Prosté díky

    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...).

    8.1.2004 11:20 Honza
    Rozbalit Rozbalit vše Prosté díky
    No ten priklad s vypocetem ceny nefunguje ani tak. Je tam totiz definovana promenna $celkovácena a print se odkazuje na promennou $celkovacena. Navic s tou carkou nad a me to hodi chybu Unrecognized character \xE1 at ./pokus.pl line 4. No proste dukaz toho, ze Perl opravdu neni jazyk pro zacatecniky. Jinak zacatecnikum a mozna i prokrocilym doporucuji dat do kodu use strict a takove chyby vas to proste nedovoli udelat. Myslim si, ze pro zacatecniky je vhodny takovy jazyk, ktery nuti k psani prehledneho kodu a to Perl rozhodne neni.
    9.1.2004 21:44 social | skóre: 20 | Plzeň
    Rozbalit Rozbalit vše Prosté díky
    program s nakupem v dobe psani fungoval, mozna doslo k chybe pri korekci nebo pri mych upravach, co se tyce chyb v printf, tak ty tam taky nemeli byt (nevim kde se stala chyba :( Opravdu se za ne omlouvam, ruzne zmeny jsem v tom clanku delal asi petkrat tak jsem je tam asi omylem vytvoril pri "dolazovani", to udelam obycejne nejvetsi neplechu. Omlouvam se pokud jsem nekoho spletl
    9.1.2004 17:42 MarSik | skóre: 16 | Brno
    Rozbalit Rozbalit vše Typova kontrola ;(
    Kdyz ony vsechny skriptovaci jazyky (lepe receno vsechny rozsirene) kaslou na typy promennych ;( proste si je vytvori jak se jim to hodi (dobre i jak se jim to rekne, jenze si pak prevadeji typy jak se jim to hodi a obcas to celkem vadi) Neznate nejakej skriptovaci (nechci javu) jazyk, ktery by byl rozumne rychly, pouzitelny a umoznil mi deklarovat typy promennych, ale pritom se tak nejak prijemne misto me staral o pamet? ;) - jo pokud by si umel povidat s mysql vubec bych nebyl proti
    Nothing is foolproof...fools are very clever.
    9.1.2004 22:57 Honza
    Rozbalit Rozbalit vše Typova kontrola ;(
    Perl nebo Python nejsou spatny. Jen je potreba nektery veci ohlidat. Jak jsem jiz psal, podle me to nejsou jazyky pro zacatecniky. Kdyz clovek vi co dela, tak nektere veci praci usnadni.
    10.1.2004 08:13 Martin Kysela | skóre: 18 | blog: The Martin Kysela's Blog | Praha
    Rozbalit Rozbalit vše Typova kontrola ;(
    Perl pro zacatecniky skutecne neni. Ale hazet ho do jednoho pytle s Pythonem je blbost. Python ma velmi cistou a dobre navrzenou syntaxi, ktera zacatecnikum vyhovovat bude a hodne je programovani v tomto jazyku nauci.

    // Martin Kysela
    // Martin Kysela
    10.1.2004 10:39 Honza
    Rozbalit Rozbalit vše Typova kontrola ;(
    Ja bych zase dal prednost Perlu. Ono totiz dost zalezi na pouziti. Pokud bude budouci uzivatel chtit "pouze" napsat par skriptu, ktere mu budou zpracovavat textove soubory, tak neni podle me nutne se ucit Python, protoze s nim se musi naucit i zakladnim principum OOP a to uz je lepsi se zacit ucit Javu nebo C++. Uplne jsem zapomnel na nize zminovanou knihu "Perl pro zelenace", podle ktere se muze Perl naucit i zacatecnik.
    10.1.2004 11:49 Martin Kysela | skóre: 18 | blog: The Martin Kysela's Blog | Praha
    Rozbalit Rozbalit vše Typova kontrola ;(
    Perl skutecne pro zacinajici programatory neni nejlepsi, protoze si zvyknou na znacnou benevolenci a volnost, ktera se jim v jinych jazycich nevyplati.

    ad OOP - Jen tak mimochodem, Perl byl jeden z prvnich jazyku, ktery mel OOP implementovane. :-)

    ad knizka - Ano, take doporucuji. I kdyz osobne davam prednost "Learning Perl" (vysla i v CJ, ale bohuzel uz se neda sehnat :-(().

    // Martin Kysela
    // Martin Kysela
    10.1.2004 17:25 Honza
    Rozbalit Rozbalit vše Typova kontrola ;(
    Zalezi na oblasti, kterou se budouci programator bude zabyvat. Nekdy muze byt lepsi zacit se ucit rovnou C nebo treba i assembler pro nejaky uC nebo DSP processor. Prechod na vyssi uroven abstrakce je rozhodne jednodussi nez naopak. Ja chapu Perl jako zastresujici nastroj, ktery nahrazuje cat,awk,sed, grep atd.. Pouzivam ho "jen" jako jazyk pro psani scriptu a ne programu.
    10.1.2004 18:32 Martin Kysela | skóre: 18 | blog: The Martin Kysela's Blog | Praha
    Rozbalit Rozbalit vše Typova kontrola ;(
    Osobne si myslim, ze pro zacatecnika je vhodnou volbou Python. Mno jo, no... Perl je mnohem vic, nez jen zastresujici nastroj pro zminene programy nebo jazyk pro psani skriptu. A proto ho mam rad. :-)

    // Martin Kysela
    // Martin Kysela
    11.1.2004 21:17 Honza
    Rozbalit Rozbalit vše Typova kontrola ;(
    To ja vim, ze Perl ma na vic. Ja ho pouzivam jen jako "uzivatel". V dnesni dobe je takove mnozstvi aplikaci, ze je opravdu staci vhodne pospojovat pomoci skriptu. Na to me nekdy staci i Bash.
    10.1.2004 09:38 Jan Matuska | skóre: 5
    Rozbalit Rozbalit vše PERL
    Podle meho nazoru je lepsi pro zacatecnika obetovat par korunek a poridit si knihu pana Satrapy "Perl pro zelenace". Diky ni jsem pred mesicem pronikl do PERLu a tak mi nedela pochopit prvni cast tohoto clanku, ktery ma v podtitulu "Dvoudílný článek vás provede základními principy práce s tímto univerzálním skriptovacím jazykem" Ovšem co ostatní, kteri vidi PERL poprve? Preji pekny zbytek dne.
    14.2.2005 00:10 Jux
    Rozbalit Rozbalit vše Perl...
    Je to malicko OT, ale neni na skriptovani dostatecny bash a na programy lepsi C, prip.C++?
    28.11.2009 21:38 derhaa | skóre: 2 | blog: derhaa
    Rozbalit Rozbalit vše Re: Programujeme v PERLu - I
    Chyba v linku na druhy dil - Programujeme v PERLu - II
    23.1.2011 21:45 Knahaka
    Rozbalit Rozbalit vše Nefunguje korektne
    $ ./scalarargvIV.pl 1 2 3 4 5 6 7 8
    8, 8
    User@acer-6e40e97492 ~
    $ cat scalarargvIV.pl
    #!/usr/bin/perl
    $i = scalar @ARGV;
    $ii = @ARGV;
    print "$i, $ii";
    User@acer-6e40e97492 ~
    $ ./scalarargvV.pl 1 2 3 4 5 6 7 8
    8 1 2 3 4 5 6 7 8
    User@acer-6e40e97492 ~
    $ cat scalarargvV.pl
    #!/usr/bin/perl
    $i = scalar @ARGV;
    $ii = @ARGV;
    print "$i @ARGV";
    User@acer-6e40e97492 ~
    ---------------------------------------------------------
    $ perl -version
    This is perl, v5.10.1 (*) built for i686-cygwin-thread-multi-64int (with 13 registered patches, see perl -V for more detail) Copyright 1987-2009, Larry Wall Perl may be copied only under the terms of either the Artistic License or the GNU General Public License, which may be found in the Perl 5 source kit. Complete documentation for Perl, including FAQ lists, should be found on this system using "man perl" or "perldoc perl". If you have access to the Internet, point your browser at http://www.perl.org/, the Perl Home Page. ---------------------------------------------------------
    $ perl -V Summary of my perl5 (revision 5 version 10 subversion 1) configuration: Platform: osname=cygwin, osvers=1.7.5(0.22553), archname=i686-cygwin-thread-multi-64in t uname='cygwin_nt-5.1 reini 1.7.5(0.22553) 2010-04-12 19:07 i686 cygwin ' config_args='-de -Dlibperl=cygperl5_10.dll -Dcc=gcc-4 -Dld=g++-4 -Dmksymlink s -Dusethreads -Dmad=y -Doptimize=-O3 -Accflags=-g3' hint=recommended, useposix=true, d_sigaction=define useithreads=define, usemultiplicity=define useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef use64bitint=define, use64bitall=undef, uselongdouble=undef usemymalloc=y, bincompat5005=undef Compiler: cc='gcc-4', ccflags ='-DPERL_USE_SAFE_PUTENV -U__STRICT_ANSI__ -g3 -fno-stri ct-aliasing -pipe -fstack-protector -I/usr/local/include', optimize='-O3', cppflags='-DPERL_USE_SAFE_PUTENV -U__STRICT_ANSI__ -g3 -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include' ccversion='', gccversion='4.3.4 20090804 (release) 1', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lsee ksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='g++-4', ldflags =' -Wl,--enable-auto-import -Wl,--export-all-symbols -Wl ,--stack,8388608 -Wl,--enable-auto-image-base -fstack-protector -L/usr/local/lib ' libpth=/usr/local/lib /usr/lib /lib libs=-lgdbm -ldb -ldl -lcrypt -lgdbm_compat perllibs=-ldl -lcrypt libc=/usr/lib/libc.a, so=dll, useshrplib=true, libperl=cygperl5_10.dll gnulibc_version='' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags=' --shared -Wl,--enable-auto-import -Wl,--export- all-symbols -Wl,--stack,8388608 -Wl,--enable-auto-image-base -L/usr/local/lib -f stack-protector' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY MYMALLOC PERL_DONT_CREATE_GVSV PERL_IMPLICIT_CONTEXT PERL_MAD PERL_USE_SAFE_PUTENV USE_64_BIT_INT USE_ITHREADS USE_LARGE_FILES USE_PERLIO USE_REENTRANT_API Locally applied patches: CYG11 no-bs CYG12 no archlib in otherlibdirs CYG14 Dynaloader CYG15 static-Win32CORE CYG17 utf8-paths CYG21 LibList-Kid.patch CYG22 cygwin-1.7 hints CYG23 544-stat CYG24 build man pages CYG25 rebase_privlib Module-Build-0.36_13 Bug#55162 CYG18 File::Spec::case_tolerant performance disable ExtUtils::MakeMaker::Coverage in Sys-Syslog Built under cygwin Compiled at Aug 28 2010 20:17:29 %ENV: CYGWIN="" @INC: /usr/lib/perl5/5.10/i686-cygwin /usr/lib/perl5/5.10 /usr/lib/perl5/site_perl/5.10/i686-cygwin /usr/lib/perl5/site_perl/5.10 /usr/lib/perl5/vendor_perl/5.10/i686-cygwin /usr/lib/perl5/vendor_perl/5.10 /usr/lib/perl5/vendor_perl/5.10 /usr/lib/perl5/site_perl/5.8 /usr/lib/perl5/vendor_perl/5.8 . ---------------------------------------------------------
    Vite nekdo duvod?
    28.1.2011 10:39 Knahaka
    Rozbalit Rozbalit vše Re: Nefunguje korektne
    Omlouvam se - duvod je (pravdepodobne) ten, ze pole se dava do skalaru.

    Založit nové vláknoNahoru

    ISSN 1214-1267   www.czech-server.cz
    © 1999-2015 Nitemedia s. r. o. Všechna práva vyhrazena.