4 replies to this topic

[milanjain7]

can anyone help me to convert below perl script into shell script:

#!/usr/bin/perl
use Env;
$status=$ENV{INSTALLATION} . "/PassPort/bin/executiveStatus";
$startCmd=$ENV{INSTALLATION} . "/PassPort/bin/startPassport";
do{
system("$startCmd");
$output=`$status`;
$output1=`netstat -an |grep 36090`;
#print $output1;
#print $output;
}while($output1 !~ m/listen/i);


Please share any kind of help/information
Best Regards,
Milan Jain

In addition to above post:
this script is use to ping a port number (in infinite loop) to check whether it is lisnening or not.

[BlackRabbit]

First, just in case, a reminder : Bash shell scripting resources

Second some first draft of the translation.

status=$INSTALLATION + "/PassPort/bin/executiveStatus";
startCmd=$INSTALLATION + "/PassPort/bin/startPassport";
output=""

while [1 -gt 0]

$startCmd
$output=$status
eval "netstat -an |grep 36090"

done

It's a draft, I have no bash on here, do the corrections and it will run

Edited by BlackRabbit, 28 January 2013 - 02:09 PM.

[milanjain7]

What about this conditional loop. In above perl script, loop will exit once the given port started listening. how can we do it in shell???

 

while($output1 !~ m/listen/i);

 

 

First, just in case, a reminder : Bash shell scripting resources

Second some first draft of the translation.
 

status=$INSTALLATION + "/PassPort/bin/executiveStatus";
startCmd=$INSTALLATION + "/PassPort/bin/startPassport";
output=""

while [1 -gt 0]

$startCmd
$output=$status
eval "netstat -an |grep 36090"

done

It's a draft, I have no bash on here, do the corrections and it will run

[BlackRabbit]

Ok, let's do that line in an if, still I don't remember what does m/ stand for, is it for multiline? if it is the g at the end stands for it.

It will go like this:

if [$output1 | sed -n "/listen/ig"];  then
 your code
fi

if you save the results in a file instead of into $output1 you can pass the file name as second parameter for sed and you will not need the pipeing

[milanjain7]

Ok, let's do that line in an if, still I don't remember what does m/ stand for, is it for multiline? if it is the g at the end stands for it.

It will go like this:

if [$output1 | sed -n "/listen/ig"];  then
 your code
fi

if you save the results in a file instead of into $output1 you can pass the file name as second parameter for sed and you will not need the pipeing

Thanks for your help.

I will use this code and will get back to you if I faced any issues :-)