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 02:00 | IT novinky

V Barceloně probíhá veletrh Mobile World Congress 2017. Nokia na něm například představila (360° video na YouTube) novou Nokii 3310 (YouTube). BlackBerry představilo BlackBerry KEYone (YouTube) s QWERTY klávesnicí. LG představilo LG G6 (YouTube). Huawei HUAWEI P10 a P10 Plus. Samsung představil tablet Galaxy Tab S3.

Ladislav Hagara | Komentářů: 0
včera 14:00 | Nová verze

Komunita kolem Linuxu From Scratch (LFS) vydala Linux Linux From Scratch 8.0 a Linux From Scratch 8.0 se systemd. Nové verze knih s návody na instalaci vlastního linuxového systému ze zdrojových kódů přichází především s Glibc 2.25 a GCC 6.3.0. Současně bylo oznámeno vydání verze 8.0 knih Beyond Linux From Scratch (BLFS) a Beyond Linux From Scratch se systemd.

Ladislav Hagara | Komentářů: 0
včera 11:11 | Nová verze

Byla vydána verze 0.10.0 webového prohlížeče qutebrowser (Wikipedie). Přehled novinek v příspěvku na blogu. Vývojáři qutebrowseru kladou důraz na ovladatelnost pomocí klávesnice a minimální GUI. Inspirovali se prohlížečem dwb a rozšířeními pro Firefox Vimperator a Pentadactyl. Prohlížeč qutebrowser je naprogramován v Pythonu a využívá PyQt5. Zdrojové kódy jsou k dispozici na GitHubu pod licencí GNU GPL 3.

Ladislav Hagara | Komentářů: 10
25.2. 16:22 | Nová verze

Po pěti měsících od vydání Waylandu a Westonu 1.12.0 oznámil Bryce Harrington (Samsung) vydání Waylandu 1.13.0 a Westonu 2.0.0.

Ladislav Hagara | Komentářů: 1
24.2. 13:37 | Bezpečnostní upozornění

Společnost Cloudflare (Wikipedie) na svém blogu potvrdila bezpečnostní problém s její službou. V požadovaných odpovědích od reverzní proxy byla odesílána také data z neinicializované paměti. Útočník tak mohl získat cookies, autentizační tokeny, data posílaná přes HTTP POST a další citlivé informace. Jednalo se o chybu v parsování HTML. Zneužitelná byla od 22. září 2016 do 18. února 2017. Seznam webů, kterých se bezpečnostní problém potenciálně týká na GitHubu.

Ladislav Hagara | Komentářů: 1
24.2. 08:22 | Nová verze

Byla vydána první beta verze Ubuntu 17.04 s kódovým názvem Zesty Zapus. Ke stažení jsou obrazy Kubuntu, Lubuntu, Ubuntu Budgie, Ubuntu GNOME, Ubuntu Kylin, Ubuntu Studio a Xubuntu. Dle plánu by Ubuntu 17.04 mělo vyjít 13. dubna 2017.

Ladislav Hagara | Komentářů: 55
23.2. 17:53 | Bezpečnostní upozornění

Google na svém blogu věnovaném počítačové bezpečnost informuje o nalezení "reálného" způsobu generování kolizí hašovací funkce SHA-1. Podrobnosti a zdrojové kódy budou zveřejněny do 90 dnů. Již dnes lze ale na stránce SHAttered nalézt 2 pdf soubory, jejichž obsah se liší a SHA-1 otisk je stejný (infografika).

Ladislav Hagara | Komentářů: 40
23.2. 17:51 | Nová verze

Vyšla nová verzia open source software na správu a automatizáciu cloudových datacentier Danube Cloud 2.4. Danube Cloud je riešenie postavené na SmartOS, ZFS, KVM a zónach. Obsahuje vlastnosti ako integrovaný monitoring, DNS manažment, zálohy, a samozrejme rozsiahlu dokumentáciu.

dano | Komentářů: 12
23.2. 17:46 | Pozvánky

V Plzni se 3. až 5. března 2017 uskuteční AIMTEChackathon. Je to akce pro vývojáře, grafiky, webdesignéry i veřejnost. Akci provází zajímavé přednášky IT odborníků. Více o programu a možnosti přihlášení na stránkách akce.

cuba | Komentářů: 0
23.2. 01:00 | Nová verze

Známý šifrovaný komunikátor Signal od verze 3.30.0 již nevyžaduje Google Play Services. Autoři tak po letech vyslyšeli volání komunity, která dala vzniknout Google-free forku LibreSignal (dnes již neudržovaný). Oficiální binárky jsou stále distribuované pouze přes Google Play, ale lze použít neoficiální F-Droid repozitář fdroid.eutopia.cz s nezávislými buildy Signalu nebo oficiální binárku stáhnout z Google Play i bez Google účtu

… více »
xm | Komentářů: 8
Jak se stavíte k trendu ztenčování přenosných zařízení (smartphony, notebooky)?
 (13%)
 (2%)
 (72%)
 (3%)
 (10%)
Celkem 721 hlasů
 Komentářů: 67, poslední dnes 01:12
    Rozcestník

    Dotaz: perl/cgi vytisknuti externiho souboru

    7.12.2007 22:21 majky8
    perl/cgi vytisknuti externiho souboru
    Přečteno: 1396×
    Dobry Den, zacal jsem si psat svuj web v Perlu, kdyz uz jsem se ho zacal ucit tak jsem si rikal proc ne. Ale narazil jsem na problem, mam napsany web bez problemu ale jakmile chci do bunky vytisknout obsah nejakeho externiho textoveho souboru pomoci
    sub nacteni {
        open(TEXT, "text")
            or die "Nelze otevrit soubor!\n";
        while ( $radek = < TEXT > ) { ##mezery pred a za "TEXT" jsou doplneni kvuli abclinuxu kde to bral jako znacku
            "$radek", ##radek 142
        }
        close(TEXT);
    }
    
    Tak jedinne, co z toho vyleze je "1". A chybove hlaseni
    Useless use of string in void context at /home/httpd/html/web/dev/gbook.pl line 142., referer: http://localhost/web/dev/index.pl
    
    Kde to chybove hlaseni nejak moc nechapu...

    Pokud to dam primo bez podprogramu do tela webu, tak se mi dostane chyboveho hlaseni Syntax error near ""Nelze otevrit soubor\\n";"

    Uz vazne nevim co mam delat, s timhle zacinam ale rad bych to vyresil...

    Odpovědi

    7.12.2007 22:48 outsider
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    co treba...
    ...
      print "$radek";
    ...
    
    7.12.2007 23:00 majky8
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    to uz jsem zkousel a vysledek je, ze to vyhodi jeste pred cely dokument takze vystup vypada takto:
    cely text souboru
    
    Content-Type: text/html; charset=utf-8
    
    < !DOCTYPE html
    	PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    	 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd" >
    < html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US" >
    < head >
    < title >Majky site!< /title >
    ...
    
    8.12.2007 08:01 outsider
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    No a ten text od
    Content-Type: text/html; charset=utf-8
    ...
    
    ten vypisujete v tom skriptu jak?
    8.12.2007 11:21 majky8
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    to je vec kterou nechapu, content-type vypisujici se jeste pred
    < !DOCTYPE html
    ...
    
    se vypisuje jen kdyz je tam
    print "$radek";
    jako kdyby patril k tomu souboru
    8.12.2007 08:32 outsider
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    Naprosto funkcni kousek nacteni souboru: :-)
    use CGI qw/:standard/;
    
    print header;
    print start_html;
    print h1("Soubor /etc/resolv.conf:");
    open F, "</etc/resolv.conf";
    $/='', $obsah = <F>;
    close F;
    print pre($obsah);
    print end_html;
    
    8.12.2007 11:28 majky8
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    kdyz to pouziju v tehle forme, tak na me vyskoci
    malformed header from script. Bad header=< pre>majky8: script.pl
    
    kde majky8 je 1. neprazdny radek v souboru ktery chci nacist. Kdyz pouziju
    open F, "< soubor";
    $/='', $obsah = < F >;
    close F;
    pre($obsah);
    
    tak to funguje z casti, spravne to cele nacte az do prazdneho radku, od ktereho dal uz to ignoruje
    8.12.2007 17:45 kafa | skóre: 10
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    Předchozí finta se změnou předddeklarované proměmmé $/ není moc dobrá už proto, že předpokládá soubor menší než 64KB.

    Což takhle:
    
    use CGI qw/:standard/;
    
    print header;
    print start_html;
    print h1("Soubor text");
    open (TEXT,"text");
    while ($radek=< TEXT >) {  # bez mezer okolo TEXT
        $radek=chomp($radek);
        print br($radek);
    }
    print end_html;
    
    8.12.2007 18:21 majky8
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    Diky za snahu bohuzel s timhle postupem se do vystupu zase dostane jenom jednicka :(
    8.12.2007 22:38 kafa | skóre: 10
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    Zatím mi není jasné, proč čtecí cykl s while nefunguje. Povedlo se mi to ale se čtením do pole:
    
    use CGI qw/:standard/;
    
    my @pole;
    print header(-charset=>'utf8');
    print start html;
    print h1("Soubor text");
    open (TEXT,"text");
    @pole=< TEXT >  # bez mezer kolem TEXT
    print pre(@pole);
    print end_html;
    
    
    8.12.2007 22:49 majky8
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    jo, tohle jsem zkousel ale zapomel jsem na pre kde to potom nedodrzovalo prazdne radky, takhle to funguje, diky :) jen jedna vec, i tohle, po SPRAVNEM vypsani celeho souboru jeste nakonec vypise jednicku :) Kazdopadne diky, da se to povazovat za vyresene?
    8.12.2007 23:54 kafa | skóre: 10
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    Předchozí případ s cyklem while funguje také, pokud se vynechá chomp. Mě to jedničku na konci souboru nepíše v žádném s obou případů, ale pracuji v mod_fcgid, nikoliv v mod_perl. Tam se mi také objevovali jedničky, např. když jsem měl sub hlavicka, ve které byl print header(...) a pak jsem omylem zavolal print hlavicka. Předpokládám, že jde o návratovou hodnotu funkce.
    9.12.2007 00:05 majky8
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    kdyz uz to mam cele napsane, o mod_fcgi v podstate nevim nic ale predpokladam zeby se to muselo prepsat, pri
    sub nacteni {
        open(SOUBOR, "soubor")
    	or die "Nelze otevrit!";
        @text=< SOUBOR >;
        $cgi->pre(@text),
        close(SOUBOR);
    }
    te jednicky nejak zbavit? uz me nic nenapada
    9.12.2007 00:43 kafa | skóre: 10
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    Došlo mi, proč chomp v cyklu while prováděl paseku (jsem to ale blb). Fce chomp přeci vrací počet smazaných znaků na konci řádku. Nemá být $radek=chomp($radek) ale jenom chomp($radek).

    Podobně předpokládám, že jednička na konci vašeho textu je návratová hodnota z funkce &nacteni. Co by provedl return ' '; na koci nacteni?
    9.12.2007 10:45 majky8
    Rozbalit Rozbalit vše Re: perl/cgi vytisknuti externiho souboru
    vyzkousel jsem to jeste s while cyklem a chomp($radek) kde mi to vratilo opet jenom jednicku :) ano, jednicka byla navratova hodnota, return ''; mi nevratilo vubec nic, ale
    return pre(@text);
    uz mi vrati ciste jenom ten text. Takze jsme se dopracovali ke zdarnemu konci, dekuji vsem za snahu :)

    Založit nové vláknoNahoru

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

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