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:20 | Zajímavý článek

David Revoy, autor open source webového komiksu Pepper&Carrot nebo portrétu GNU/Linuxu, upozorňuje na svém blogu, že nový Inkscape 0.92 rozbíjí dokumenty vytvořené v předchozích verzích Inkscape. Problém by měl být vyřešen v Inkscape 0.92.2 [reddit].

Ladislav Hagara | Komentářů: 0
dnes 02:02 | Komunita

Øyvind Kolås, hlavní vývojář grafických knihoven GEGL a babl, které využívá grafický program GIMP, žádá o podporu na Patreonu. Díky ní bude moci pracovat na vývoji na plný úvazek. Milník 1000 $, který by stačil na holé přežití, se již téměř podařilo vybrat, dalším cílem je dosažení 2500 $, které mu umožní běžně fungovat ve společnosti.

xkomczax | Komentářů: 12
včera 23:54 | Pozvánky

DevConf.cz 2017, již devátý ročník jedné z největších akcí zaměřených na Linux a open source ve střední Evropě, proběhne od pátku 27. ledna do neděle 29. ledna v prostorách Fakulty informačních technologií Vysokého učení technického v Brně. Na programu je celá řada zajímavých přednášek a workshopů. Letos je povinná registrace.

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

Byla vydána verze 1.0.0 emulátoru terminálu Terminology postaveného nad EFL (Enlightenment Foundation Libraries). Přehled novinek v poznámkách k vydání.

Ladislav Hagara | Komentářů: 0
20.1. 17:00 | Nová verze

Byl vydán Docker 1.13. Přehled novinek na YouTube a v poznámkách k vydání na GitHubu. Docker umožňuje běh aplikací v softwarových kontejnerech (Wikipedia).

Ladislav Hagara | Komentářů: 4
20.1. 15:51 | Komunita

Mozilla.cz informuje, že nástroje pro webové vývojáře se možná oddělí od Firefoxu a stanou doplňkem. Nástroje pro webové vývojáře prošly velkým přepisem a tým, který se stará o jejich vývoj, by uvítal možnost jejich častějších aktualizacích nezávisle na vydávání nových verzí Firefoxu.

Ladislav Hagara | Komentářů: 10
20.1. 07:00 | Humor

Čtenářům AbcLinuxu vše nejlepší k dnešnímu Dni zvýšení povědomí o tučňácích (Penguin Awareness Day).

Ladislav Hagara | Komentářů: 0
20.1. 06:00 | Komunita

Bylo spuštěno hlasování o přednáškách a workshopech pro letošní InstallFest, jenž proběhne o víkendu 4. a 5. března v Praze. Současně byla oznámena změna místa. InstallFest se letos vrací zpět na Karlovo náměstí do budovy E.

Ladislav Hagara | Komentářů: 0
20.1. 02:48 | Komunita

Greg Kroah-Hartman potvrdil, že Linux 4.9 je jádrem s prodlouženou upstream podporou (LTS, Long Term Support). Podpora je plánována do ledna 2019. Aktuální jádra s prodlouženou podporou jsou tedy 3.2, 3.4, 3.10, 3.12, 3.16, 3.18, 4.1, 4.4 a 4.9.

Ladislav Hagara | Komentářů: 0
20.1. 00:11 | Zajímavý článek

Výrobce síťových prvků, společnost Netgear, spustila nový program, který slibuje vývojářům, expertům, ale i běžným uživatelům vyplacení finanční odměny za nalezení bezpečnostních chyby v jejich produktech. Za nalezení zranitelnosti v hardware, API nebo mobilní aplikaci nabízí odměnu od 150 do 15 tisíc dolarů (dle závažnosti).

Michal Makovec | Komentářů: 0
Jak se stavíte k trendu ztenčování přenosných zařízení (smartphony, notebooky)?
 (10%)
 (2%)
 (74%)
 (3%)
 (10%)
Celkem 360 hlasů
 Komentářů: 25, poslední včera 13:34
Rozcestník
Reklama

Dotaz: perl spustenie viacej procedur naraz

30.8.2005 13:47 janci | skóre: 5
perl spustenie viacej procedur naraz
Přečteno: 47×
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.