Perl script running multiple commands at once Post: 302940222

Sponsored Content

Top Forums Shell Programming and Scripting Perl script running multiple commands at once Post 302940222 by mutley2202 on Thursday 2nd of April 2015 07:40:52 AM

04-02-2015

Registered User

Perl script running multiple commands at once

Hi All,
I have put a perl script together to go and collect some information from multiple nodes/endpoints. The script works absolutly fine however I want to make it quicker.

You will see in the below that my script calls an expect script called ssh_run_cmd2.exp followed by the IP of the node in question. Once that has finished it moves on to the next node.

Is there a way of getting it to call all the commands such as the below

Code:

ssh_run_cmd2.exp xxx.xxx.xxx.xxx $log "show association peer-address $ip

to trigger at once rather than waiting for each one to finsih.

None of the commands are dependant on the previous one.

Code:

        for (`./ssh_run_cmd2.exp xxx.xxx.xxx.xxx $log "show association peer-address $ip"`) {
                if (/^\s+ID       : (\S+)/) {
                        $ID = $1;
                        $peerfound = 'YES';
                } elsif (/(No matching peer)\S+/) {
                        $peerfoundoutcome = "$1"
                } elsif (/\S{7}(\S+)\s/) {
                        $hostname = $1;
                        }
                }
        for (`./ssh_run_cmd2.exp xxx.xxx.xxx.xxx $log "show association peer-address $ip"`) {
                if (/^\s+ID       : (\S+)/) {
                        $ID1 = $1;
                        $peerfound1 = 'YES';
                } elsif (/(No matching peer)\S+/) {
                        $peerfoundoutcome1 = "$1"
                } elsif (/\S{7}(\S+)\s/) {
                        $hostname1 = $1;
                        }
                }

Thanks in advance

mutley2202

View Public Profile for mutley2202

Find all posts by mutley2202

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

[PERL] Running unix commands within Perl Scripts

I understand that in order to run basic unix commands I would normally type at the prompt, I would have to use the following format system(ls -l); or exec(ls -l); But when I actually try to use the command, the script fails to compile and keeps telling me there is an error with this line. ...

2. Shell Programming and Scripting

Running unix commands through perl

Hi all, In the directory '/temp/chris' the following files exist: chris.tar, chris.txt What i am trying to do is to assign the 'chris.tar' filename in an argument through perl, in order to do that i use the system command: $file=system("ls /temp/chris/*.tmp), but in the '$file' the exit...

3. UNIX for Dummies Questions & Answers

running a simple script file with multiple commands

I'm trying to run a script file with multiple commands that I would normally type into the command line. The commands are: #!/bin/bash diff Test1.o0 /usr3/ronelso4/Desktop/verificationKPC/Test1.o0 > differences2 diff Test1a.o0 /usr3/ronelso4/Desktop/verificationKPC/Test1a.o0 >> differences2...

4. Shell Programming and Scripting

Running multiple unix commands in a single script

Hi, I would like to write a script with include more than 6 unix commands. my script like below: echo " script started" ls -ld bdf | grep "rama" tail -10 log.txt ... .. ... now, i want to run above unix commands one by one. example: first the ls -ld command will be...

5. Shell Programming and Scripting

Running unix commands in a perl script

Executing two unix commads via perl script one after another e.g: make clean bsub -i -q short make have tried using exec but the second command doesnt executes

6. Programming

Running Multiple Unix commands in qx

Hi All, Is there anything wrong with below syntax? qx {perldoc -v ModuleName.pm | grep -i Description } BTW, this question is related to Perl. Thanks.

7. Shell Programming and Scripting

Running multiple commands stored as a semi-colon separated string

Hi, Is there a way in Korn Shell that I can run multiple commands stored as a semi-colon separated string, e.g., # vs="echo a; echo b;" # $vs a; echo b; I want to be able to store commands in a variable, then run all of it once and pipe the whole output to another program without using...

8. Shell Programming and Scripting

Get multiple values from an xml file using one of the following commands or together awk/perl/script

Hello, I have a requirement to extract the value from multiple xml node and print out the values to new file to compare. Would be done using either awk/perl or some unix script. For example sample input file: ..... ..... <factories xmi:type="resources.jdbc:DataSource"...

9. Shell Programming and Scripting

Issue with running multiple commands withing su command

RHEL 6.2/Bash shell root user will be executing the below script. It switches to oracle user and expect to do the following things A. Source the environment variables for BATGPRD Database (the file used for sourcing is shown below after the script) B. Shutdown the DB from sqlplus -- The...

10. Shell Programming and Scripting

Check status of long running multiple curl commands in shell script

I am working on script. it reads a file which contains multiple lines Ex; curl --write-out %{http_code} --silent --output /dev/null http://hostname:port/input=1 curl --write-out %{http_code} --silent --output /dev/null http://hostname:port/input=2 curl --write-out %{http_code} --silent ...

LEARN ABOUT DEBIAN

smpppd-ifcfg

SMPPPD-IFCFG(8) 						      SMPPPD							   SMPPPD-IFCFG(8)

NAME

       smpppd-ifcfg - SuSE Meta PPP Daemon

DESCRIPTION

       smpppd-ifcfg  is  a daemon that controls a single dialup connection to the internet.  It does so by starting and controlling the pppd.  The
       configuration of the dialup connections is done by YaST2.

       smpppd-ifcfg is not intended for direct use. Use ifup and ifdown or a frontend like cinternet , qinternet or kinternet instead.

OPTIONS

       These options are recognized by smpppd-ifcfg.  If a long option shows an argument as mandatory, then it is  mandatory  for  the	equivalent
       short option also.

       --up   Bring the connection up.	This is the default action.

       --down Bring the connection down.

       --status
	      Report status of the connection.

       -i, --ifcfg=NAME
	      Specify the ifcfg file to use.  This option is mandatory.

       -p, --provider=NAME
	      Specify the provider file to use.

       --detach
	      Detach from the controlling terminal.  This is the default.

       --nodeatch
	      Don't detach from the controlling terminal.

       -d, --debug
	      Turn on debugging.

       --version
	      Show program version and exit.

       --help Show help information and exit.

FILES

       /etc/sysconfig/network/ifcfg-*
	      Configuration files for the interfaces.

       /etc/sysconfig/network/providers/*
	      Configuration files for the providers.

       /var/log/smpppd/ifcfg-xxx.log
	      Log file.

       /var/log/smpppd/accounting.log
	      File containing accounting information.

       /var/run/smpppd.ifcfg-xxx.pid
	      Pid file.

       /var/lib/smpppd/ifcfg-xxx.info
	      Info file with various status information.

       /var/run/smpppd/ifcfg-xxx
	      Socket to communicate with smpppd.

SEE ALSO

       kinternet, qinternet, cinternet(1), accounting(1), wvdial(1), smpppd.conf(5), pppd(8), smpppd(8).

AUTHOR

       Arvin Schnell <arvin@suse.de>

SuSE								   December 2002						   SMPPPD-IFCFG(8)

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

[PERL] Running unix commands within Perl Scripts

Discussion started by: userix

2. Shell Programming and Scripting

Running unix commands through perl

Discussion started by: chriss_58

3. UNIX for Dummies Questions & Answers

running a simple script file with multiple commands

Discussion started by: knelson

4. Shell Programming and Scripting

Running multiple unix commands in a single script

Discussion started by: koti_rama