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í
×
    včera 22:22 | Komunita

    Open source webový aplikační framework Django slaví 20. narozeniny.

    Ladislav Hagara | Komentářů: 0
    včera 16:11 | Komunita

    V Brestu dnes začala konference vývojářů a uživatelů linuxové distribuce Debian DebConf25. Na programu je řada zajímavých přednášek. Sledovat je lze online.

    Ladislav Hagara | Komentářů: 0
    včera 11:33 | IT novinky

    Před 30 lety, tj. 14. července 1995, se začala používat přípona .mp3 pro soubory s hudbou komprimovanou pomocí MPEG-2 Audio Layer 3.

    Ladislav Hagara | Komentářů: 22
    včera 10:55 | IT novinky

    Výroba 8bitových domácích počítačů Commodore 64 byla ukončena v dubnu 1994. Po více než 30 letech byl představen nový oficiální Commodore 64 Ultimate (YouTube). S deskou postavenou na FPGA. Ve 3 edicích v ceně od 299 dolarů a plánovaným dodáním v říjnu a listopadu letošního roku.

    Ladislav Hagara | Komentářů: 19
    13.7. 17:55 | Zajímavý projekt

    Společnost Hugging Face ve spolupráci se společností Pollen Robotics představila open source robota Reachy Mini (YouTube). Předobjednat lze lite verzi za 299 dolarů a wireless verzi s Raspberry Pi 5 za 449 dolarů.

    Ladislav Hagara | Komentářů: 13
    11.7. 16:44 | Komunita

    Dnes v 17:30 bude oficiálně vydána open source počítačová hra DOGWALK vytvořena v 3D softwaru Blender a herním enginu Godot. Release party proběhne na YouTube od 17:00.

    Ladislav Hagara | Komentářů: 3
    11.7. 14:55 | Humor

    McDonald's se spojil se společností Paradox a pracovníky nabírá také pomocí AI řešení s virtuální asistentkou Olivii běžící na webu McHire. Ian Carroll a Sam Curry se na toto AI řešení blíže podívali a opravdu je překvapilo, že se mohli přihlásit pomocí jména 123456 a hesla 123456 a získat přístup k údajům o 64 milionech uchazečů o práci.

    Ladislav Hagara | Komentářů: 16
    11.7. 00:11 | Nová verze

    Byla vydána (𝕏) červnová aktualizace aneb nová verze 1.102 editoru zdrojových kódů Visual Studio Code (Wikipedie). Přehled novinek i s náhledy a videi v poznámkách k vydání. Ve verzi 1.102 vyjde také VSCodium, tj. komunitní sestavení Visual Studia Code bez telemetrie a licenčních podmínek Microsoftu.

    Ladislav Hagara | Komentářů: 0
    10.7. 21:00 | Bezpečnostní upozornění

    Byla vydána nová verze 2.4.64 svobodného multiplatformního webového serveru Apache (httpd). Řešeno je mimo jiné 8 bezpečnostních chyb.

    Ladislav Hagara | Komentářů: 4
    10.7. 15:22 | Nová verze

    Společnost xAI na síti 𝕏 představila Grok 4, tj. novou verzi svého AI LLM modelu Grok.

    Ladislav Hagara | Komentářů: 12
    Jaký je váš oblíbený skriptovací jazyk?
     (59%)
     (26%)
     (7%)
     (3%)
     (1%)
     (1%)
     (4%)
    Celkem 397 hlasů
     Komentářů: 16, poslední 8.6. 21:05
    Rozcestník

    Dotaz: perl a fce ` `

    5.3.2006 18:33 h7
    perl a fce ` `
    Přečteno: 164×
    Ahoj ,snazim se v Perlu pomoci fce `` zavolat bash prikazy spojene rourou a vyslednou hodnotu ulozit do promene takto:

    $pocet = `/bin/ls -R |/usr/bin/wc -l`

    ...a nefunguje to ,kde delam chybu? Zkousel jsem prikazy spustit v subshelu a take nepomohlo.

    $pocet = `(/bin/ls -R |/usr/bin/wc -l)`

    Diky za kazdou ideu. Pekny vecer h7

    Odpovědi

    5.3.2006 18:48 hrobar | skóre: 13
    Rozbalit Rozbalit vše Re: perl a fce ` `
    `` sa vola backticks. Chyba ti tam bodkociarka na konci.
    5.3.2006 18:50 h7
    Rozbalit Rozbalit vše Re: perl a fce ` `
    sorry ,ja ji zapomel do diskuze napsat, s ni to take nejede..
    5.3.2006 18:54 hrobar | skóre: 13
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Ja som spravil cut&paste doplnil bodkociarku a funguje to bez problemov. Co ti to vypisuje za error?
    5.3.2006 20:58 Dunric | skóre: 21
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Fungovat by to mělo. Co myslíš tím, že to nejde ? Nespouštíš to náhodou nad jiným adresářem než očekáváš ?
    In the garden sleeps a messenger ·
    6.3.2006 09:39 h7
    Rozbalit Rozbalit vše Re: perl a fce ` `
    $soubor=`/bin/ls -R $adresar | /usr/bin/wc -l`;

    hodi mi chybu:

    sh: -c: line 1: syntax error near unexpected token `|' sh: -c: line 1: ` | /usr/bin/wc -l' sh: -c: line 1: syntax error near unexpected token `|' sh: -c: line 1: ` | /usr/bin/wc -l' sh: -c: line 1: syntax error near unexpected token `|' sh: -c: line 1: ` | /usr/bin/wc -l'

    strednik na konci nepouze .... h7
    5.3.2006 19:21 0
    Rozbalit Rozbalit vše Re: perl a fce ` `
    V perlu je tahle vec implementovana pomerne zajimavym zpusobem:
    open(A,"|/bin/ls -R |/usr/bin/wc -l");
    $pocet = <A>;
    close(A);
    print $pocet;
    
    5.3.2006 19:41 hrobar | skóre: 13
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Az na to, ze to tvoje riesenie nefunguje. $pocet zostane neinicializovany.
    5.3.2006 19:57 0
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Funguje, ale vypisuje warning. Opravena verse:
    #!/usr/local/bin/perl -w
    open(A,"|/bin/ls -R |/usr/bin/wc -l");
    $pocet = A;
    close(A);
    print $pocet;
    
    (zmente si cestu k perl binarce, pokud to mate jinde). Aspon je videt, jakej je ten perl totalne zmatenej. Mam pocit, ze starsi interprety vyzadovaly tam ty zavorky, zatimco ty novejsi ne.
    5.3.2006 20:09 hrobar | skóre: 13
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Trvam na tom, ze to predchadzajuce riesenie je zle a nefunguje. Prepis print $pocet; na print "Vypis: $pocet"; a pusti si to. Vypise ti to Vypis: a nad tym sice bude vypisany pocet fajlov ale tie nie su vypisane cez perl(print) ale vypisuje ich ten vyraz uvedeny v backticks. $pocet je neinicializovany.
    5.3.2006 20:19 hrobar | skóre: 13
    Rozbalit Rozbalit vše Re: perl a fce ` `
    A to druhe riesenie je tiez zle. print vypise "A". Ospravedlnujem sa, ze to pisem do dvoch prispevkov som ten prvy omylom odoslal.
    6.3.2006 13:49 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a fce ` `
    (zmente si cestu k perl binarce, pokud to mate jinde). Aspon je videt, jakej je ten perl totalne zmatenej.
    RTFM perlrun
    Mam pocit, ze starsi interprety vyzadovaly tam ty zavorky, zatimco ty novejsi ne.
    ROFL. Ty jseš mimoň.
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    6.3.2006 10:00 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Hmm a ty do toho něco posíláš a nic z toho číst nehodláš? Tomu říkám perl odborník.
    $ perl <<EOF
    open(A,"|/bin/ls -R |/usr/bin/wc -l");
    $pocet = <A>;
    close(A);
    print "Je tam toho $pocet";
    EOF
    5740
    Je tam toho $ perl <<EOF
    open(A,"/bin/ls -R |/usr/bin/wc -l|");
    $pocet = <A>;
    close(A);
    print "Je tam toho $pocet";
    EOF
    Je tam toho 5740
    $
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    6.3.2006 10:37 barney
    Rozbalit Rozbalit vše Re: perl a fce ` `
    mala chybicka sa ti vkradla :-))

    open(A,"|/bin/ls -R |/usr/bin/wc -l");
    open(A,"/bin/ls -R |/usr/bin/wc -l|");

    prve je zapisovanie, druhe citanie

    6.3.2006 07:24 petr_p
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Ja nevim, ale mne (perl-5.8.7) to funguje:
    petr@cz2cbjmc:~/web $ perl -we 'my $data=`/bin/ls -R |/usr/bin/wc -l`; print "Vystup\n${data}Konec vystupu\n";' 
    Vystup
    1
    Konec vystupu
    
    6.3.2006 09:54 h7
    Rozbalit Rozbalit vše Re: perl a fce ` `
    $soubor=`/bin/ls -R $adresar | /usr/bin/wc -l`;

    Tak jsem prisel na chybu ,ktera je v pouziti kontrukce $adresar. Takze nova otazka je ,jak zavolat prikaz z bashe s parametrem? h7
    6.3.2006 10:02 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a fce ` `
    perl -we 'my $adresar=q(work); my $data=qx(/bin/ls -R $adresar|/usr/bin/wc -l); print qq(Vystup\n${data}Konec vystupu\n);'
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    6.3.2006 12:05 h7
    Rozbalit Rozbalit vše Re: perl a fce ` `
    pane kolegu,vase konstrukce vypada zajimave :-) ,ale $data=qx(/bin/ls -R $adresar|/usr/bin/wc -l); mi stale nechodi.Muzete mi vas priklad trosku osvetlit? h7
    6.3.2006 12:27 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Informace:
    mi stale nechodi
    rovná se žádná informace. Obzvláště pokud mě to chodí a bez problémů. Co znamená nechodí? Nemá to nožičky, tak to ani chodit nemůže. Co se týče konstrukcí q(), qq(), qx(), qw() a další, RTFM perlop.
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    6.3.2006 12:46 h7
    Rozbalit Rozbalit vše Re: perl a fce ` `
    CHYBA: sh: -c: line 1: syntax error near unexpected token `|' sh: -c: line 1: ` | /usr/bin/wc -l'

    ...a muj skript ,ktery ma vytisknout velikost,pocet souboru a jmeno uzivatele maildiru.

    ps: v perlu delam teprve 2 den h7

    #!/usr/bin/perl -w use warnings; use locale;

    @velikosti = (); @osoby = (); @soubory = ();

    @adresare = `/bin/find /_zaloha -type d -iname '*Maildir*'`;

    foreach $adresar (@adresare) { $velikostH = `/usr/bin/du -sk $adresar`; @velikostiH = split (/\s/,$velikostH); push (@velikosti,$velikostiH[0]); @osobyH = split(/\//,$adresar); if ($osobyH[-2] =~ /\d{1,2}/ ) { push (@osoby,$osobyH[-3]); } else { push (@osoby,$osobyH[-2]); } $soubor= qx(/bin/ls -R $adresar | /usr/bin/wc -l); push (@soubory,$soubor); }

    for ($i=0;$i<=$#adresare;++$i) { print $osoby[$i]."\n"; print $velikosti[$i]."\n"; print $soubory[$i]."\n"; }
    6.3.2006 13:42 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Ty neznáš tag pre? Tím bych začal, no a pak je tu ta záležitost s tím koncem řádku. Schválně jestli příjdeš na to co tím myslím. Krom toho na to jdeš úplně blbě. Volání nějakých scriptů je zbytečné.
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    6.3.2006 10:33 barney
    Rozbalit Rozbalit vše Re: perl a fce ` `
    ...
    $adresar =~ s/"/\\"/g;
    $soubor=`/bin/ls -R "$adresar" | /usr/bin/wc -l`;
    
    6.3.2006 12:32 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Nebylo by poněkud bezpečnější použít String::ShellQuote?
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    6.3.2006 13:16 barney
    Rozbalit Rozbalit vše Re: perl a fce ` `
    no to by bolo :-) takisto ako pouzit File::Find (tiez na cpan-e)
    6.3.2006 12:32 Dunric | skóre: 21
    Rozbalit Rozbalit vše Re: perl a fce ` `
    Ty jseš samá legrace. Nějak ti ta proměnná $adresar z původního dotazu vypadla, co ?
    In the garden sleeps a messenger ·
    6.3.2006 12:42 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl a fce ` `
    hmm, a krom toho vlastně nechápu proč nepoužije radši něco takového
    perl -MFile::Find -e 'find(sub{$a++}, q(work)); print $a,$/'
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    6.3.2006 12:41 h7
    Rozbalit Rozbalit vše Re: perl a fce ` `
    stane se..pardon h7

    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.