Re: Parsing 'ps' output

[themage]

in reply to Parsing 'ps' output

Hi vineet2004,

You would not be here asking us it it was correct, would you? I think your only mistake is in this line:

if(/^([\d]+)*(hullBts_static)/)

You are missing the dot (.) before the asterisk. It should be:

if(/^([\d]+).*(hullBts_static)/)

I don't see any other problem, and it should do what you want... I guess.

[vineet2004]

hey monks...thanks for the help i have one more prob.....how do i accept this STDOUT $var into the shell script.....i know its not related to perl probably.....but i think u giys would know my code goes like this.....actually this isnt mine...a monk wrote it for me

perl -ne 'while (my $var= <STDIN>)
{
$run = "awk -f work _5messages.awk ".$var; `$run`;
}'

the error is :

awk: fatal: can't open source file `work' for reading (No such file or
+ directory

[jettero]

Oh, you mean in "Re: shell prob?" Yeah, you have an extra space there. You didn't type what he typed...

[alpha]

there should not be any spaces after 'work' in the code ;)