abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
    dnes 13:00 | Nová verze

    Komunita kolem Linuxu From Scratch (LFS) vydala Linux From Scratch 12.1 a Linux From Scratch 12.1 se systemd. Nové verze knih s návody na instalaci vlastního linuxového systému ze zdrojových kódů přichází s Glibc 2.39, Binutils 2.42 a Linuxem 6.7.4. Současně bylo oznámeno vydání verze 12.1 knih Beyond Linux From Scratch (BLFS) a Beyond Linux From Scratch se systemd.

    Ladislav Hagara | Komentářů: 0
    včera 22:22 | Upozornění

    Google blokuje Chaty RCS (Rich Communication Services neboli rozšířené komunikační služby) na telefonech s rootnutým Androidem nebo odemčeným zavaděčem [9to5Google].

    Ladislav Hagara | Komentářů: 7
    včera 12:22 | Komunita

    Bylo spuštěno hlasování o přednáškách a workshopech pro letošní Installfest, jenž proběhne o víkendu 16. a 17. března v Praze na Karlově náměstí 13. O open source hardwaru bude přednášet Mitch Altman.

    Ladislav Hagara | Komentářů: 1
    včera 08:00 | IT novinky

    Počítač NitroPC Pro 2 od společnosti Nitrokey s corebootem Dasharo byl oficiálně certifikován pro Qubes OS verze 4. Qubes OS (Wikipedie) je svobodný a otevřený operační systém zaměřený na bezpečnost desktopu.

    Ladislav Hagara | Komentářů: 1
    včera 07:00 | Nová verze

    Mobilní operační systém /e/OS (Wikipedie) založený na Androidu / LineageOS, ale bez aplikací a služeb od Googlu, byl vydán ve verzi 1.20. Přehled novinek na GitLabu.

    Ladislav Hagara | Komentářů: 17
    29.2. 13:00 | IT novinky

    Jednodeskový počítač Raspberry Pi slaví 12 let. Prodej byl spuštěn 29. února 2012 (Wikipedie, 𝕏).

    Ladislav Hagara | Komentářů: 13
    29.2. 12:00 | Nová verze

    Byla vydána verze 3.2 multiplatformního integrovaného vývojového prostředí (IDE) pro rychlý vývoj aplikaci (RAD) ve Free Pascalu Lazarus (Wikipedie). Přehled novinek v poznámkách k vydání. Využíván je Free Pascal Compiler (FPC) 3.2.2.

    Ladislav Hagara | Komentářů: 0
    29.2. 11:44 | Nová verze

    Byla vydána nová verze 1.6.0 grafického správce diskových oddílů GParted (GNOME Partition Editor) a také verze 1.6.0 živé distribuce GParted Live, která obsahuje tohoto správce a další nástroje pro zálohování či obnovu dat. Linux byl povýšen na verzi 6.6.15-2.

    Ladislav Hagara | Komentářů: 8
    29.2. 06:00 | Nová verze Ladislav Hagara | Komentářů: 0
    28.2. 22:44 | Nová verze

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

    Ladislav Hagara | Komentářů: 18
    Steam
     (18%)
     (30%)
     (9%)
     (11%)
     (32%)
    Celkem 56 hlasů
     Komentářů: 0
    Rozcestník

    Dotaz: perl spustenie viacej procedur naraz

    30.8.2005 13:47 janci | skóre: 5
    perl spustenie viacej procedur naraz
    Přečteno: 70×
    Zdravim, potreboval by som v perlovskom scripte spustit vedla seba (subezne) 3 procedury, po ich skonceni by mala nasledovat stvrta. Urichlil by som tak ukoncenie scriptu ktory trva asi 5 min. Vie mi niekto poradit ? Viem ze by to malo ist cez fork, no nerozumiem strukture tohto prikazu.

    tieto by mali ist spolu (teraz su pisane pod sebou): & lsfbvol; & lsrank; & lshostconnect; & showvolgrp; & cap;

    tento by sa mal spustit posledny ked dobehnu predch. & disk;

    DIK

    Odpovědi

    30.8.2005 14:05 zabza | skóre: 52 | blog: Nad_sklenkou_cerveneho
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    Co konkrétně vám není na příkazu fork a wait (resp. waitpid) jasné?
    30.8.2005 14:50 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    Tak to by snad bylo whodnější odkázat na fork, wait a waitpid. Krom toho je tu hned k dispozici celý tutoriál o použití. A osobně bych místo waitpid radši použil odchycení signálu CHLD viz. perlipc.
    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é.
    30.8.2005 15:18 janci | skóre: 5
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    napiste mi ako to mam napisat do skriptu miesto mojich riadkov.

    fork ... lsfbvol, ...?
    30.8.2005 15:21 Peter Rychnavsky
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    Ešte, že si nepoužil výkričník...
    30.8.2005 15:52 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    Zadarmo ani kuře ... Krom toho, proč to najednou děláš v perlu? Vždyť v bashi je to
    lsfbvol & lsrank & lshostconnect & showvolgrp & cap & wait; disk
    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é.
    30.8.2005 16:04 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    Třeba takhle
    foreach (qw(lsfbvol lsrank lshostconnect showvolgrp cap)) {
      next unless fork;
      exec $_;
    }
    while(wait != -1){}
    system 'disk'
    P.S.: Schv8ln2 jsem to napsal takto pěkně čitelně :-)
    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é.
    30.8.2005 16:39 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    sorry, je tam chybka místo
    next unless fork;
    má být
    next if fork;
    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é.
    31.8.2005 09:28 janci | skóre: 5
    Rozbalit Rozbalit vše perl spustenie viacej procedur naraz
    dakujem Ti velmi pekne, este som to neskusal, no aspon vylustim ako sa fork pouziva. Priklady ktore su v knihach idu bez problemov, akonahle clovek nieco chce tak mu to nefunguje. Zacal som s perlom len pred tyzdnom, neako mi nevonia. Vacsinu skriptov pisem v shell. No zistil som ze perl je tak trochu pruznejsi v niektorych veciach. Tak dik. Niekedy na pive ...
    31.8.2005 10:01 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    Nz. Perl je mocný nástroj a jako každý mocný nástroj je i nebezpečný při špatném zacházení. Pokud si nehodláš dávat pozor na jeho ostré hrany, tak je asi lepší python. I když některým nepomůže ani to. Jinak ten můj příklad nemá ošetřeno, že se nepodaří forknout, že ty programy selžou a pod.
    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.9.2005 13:08 janci | skóre: 5
    Rozbalit Rozbalit vše perl spustenie viacej procedur naraz
    Mas pravdu, skusil som ten tvoj script, trochu ho upravil a aj tak mi robi hluposti. Spusta neako vela procedur. Skus :

    TAKTO VYZERA SCRIPT

    # cat scfork.pl #!/usr/bin/perl sub r1 { @P=`ls -lR / > /dev/null 2>&1`; print "prva:\n"; } sub r2 { @R=`ls -lR / > /dev/null 2>&1`; print "druha:\n"; } sub r3 { @P=`ls -lR / > /dev/null 2>&1`; print "tretia:\n"; } # foreach $K (qw(r1 r2)) { next if fork; &$K; } while(wait != -1){}; & r3;

    SAMOTNE SPUSTENIE

    # ./scfork.pl druha: prva: druha: tretia: tretia: tretia: tretia: #

    Asi som blby, no nepochopil som.
    6.9.2005 13:54 zabza | skóre: 52 | blog: Nad_sklenkou_cerveneho
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    Nebylo by lepší konečně trošku namáhat mozek a pochopit, co ten fork() vlastně dělá?

    ... {next if fork; &$K; exit} ...
    6.9.2005 13:57 zabza | skóre: 52 | blog: Nad_sklenkou_cerveneho
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    ... teda aspoň doufám, mě to dneska taky moc nemyslí :-)
    6.9.2005 14:11 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: perl spustenie viacej procedur naraz
    RTFM! perldoc -f exec a exec(3) Taky by neuškodilo RTFM pod inputboxem komentáře a speciálně si zjistit co dělá tag <pre>.
    #!/usr/bin/perl
    sub caller_name ($) { local $_ = (caller($_[0]+1))[3]; s/^main:://; $_ }
    sub print_start () { print 'start ', caller_name 1, $/ }
    sub print_stop () { print 'stop ', caller_name 1, $/ }
    sub r1 {
      print_start;
      @R=qx{ls -lR > /dev/null 2>&1};
      print_stop;
    }
    sub r2 {
      print_start;
      @R=qx{ls -lR > /dev/null 2>&1};
      print_stop;
    }
    sub r3 {
      print_start;
      @P=qx{ls -lR > /dev/null 2>&1};
      print_stop;
    }
    foreach $K (qw(r1 r2)) {
      next if fork;
      &$K;
      exit 0;  # stop child
    }
    while(wait != -1){};
    &r3;
    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é.

    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.