форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Архивированная нить - только для чтения!  Пред. тема | След. тема
Форумы Программирование под UNIX (Public)
Изначальное сообщение		[Проследить за развитием треда]

"Как из перла запустить длинную пайповую конструкцию"
Сообщение от Simps on 18-Фев-03, 12:52  (MSK)
Есть код который обсчитывает (пытается) flow с кошки Не отрабатывает команда $syscmd,точнее она делает но такое чувство как будто перл рубит процессы дав им поработать пару секунд ... Если запустиь ее с консоли то все ок. while ( defined ($filename = readdir(DIRECTORY)) ) { if ( $filename =~ /Wft-v05.$date[0]-$date[1]-$date[2]/ )     { $cmdline=$dir.$filename; $aclfilename="/tmp/".$ARGV[1]."\.acl"; $reportname=$filename."\.rep"; $syscmd="./cmd.sh $cmdline $aclfilename $what $reportname"; #эТО cmd.sh ##!/bin/sh #flow-cat $1 | flow-filter -f $2 -$3 client | flow-print -f3 >/tmp/$4 # system($syscmd) == 0 or die "system $syscmd failed: $?"     } } Пробовал так же и вот так $syscmd="flow-cat $cmdline | flow-filter -f $aclfilename -$what client | flow-print -f3>$reportname";
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Индекс форумов | Темы | Пред. тема | След. тема

Сообщения по теме

1. "RE: Как из перла запустить длинную пайповую конструкцию"
Сообщение от Simps on 18-Фев-03, 12:55  (MSK)
>Есть код который обсчитывает (пытается) flow с кошки >Не отрабатывает команда $syscmd,точнее она делает но такое чувство как будто перл >рубит процессы дав им поработать пару секунд ... Если запустиь ее >с консоли то все ок. >while ( defined ($filename = readdir(DIRECTORY)) ) >{ >if ( $filename =~ /Wft-v05.$date[0]-$date[1]-$date[2]/ ) >    { >$cmdline=$dir.$filename; >$aclfilename="/tmp/".$ARGV[1]."\.acl"; >$reportname=$filename."\.rep"; >$syscmd="./cmd.sh $cmdline $aclfilename $what $reportname"; >#эТО cmd.sh >##!/bin/sh >#flow-cat $1 | flow-filter -f $2 -$3 client | flow-print -f3 >/tmp/$4 ># >system($syscmd) == 0 >or die "system $syscmd failed: $?" >    } >} >Пробовал так же и вот так >$syscmd="flow-cat $cmdline | flow-filter -f $aclfilename -$what client | flow-print -f3>$reportname"; Нужно чтобы это все не налетело всей кучей на бедный сервак а как цивилизованные люди по очереди обсчиталось
	Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.