## wrapper script in perl

wrapper script in perl
# 1
03-23-2009
wrapper script in perl

Hi,

I am in need of way to facilitate this senerio in a perl script.

I have CLI ( command line interface) which I run like so:

kip-tepltist -u Xxx -p Xxx

Which produces tones of names from each template it found:

194Iselin-NJ
33-IDFLB-North-611-Woodward-8600
34-IDFMBS-611-Woodward-860004-Vo
CAF-10.41.22
ukgla.ops.sun4us.bk
ukgla.ops.sun4us.prd

Basically the cli above is grabbing template information and spitting out the names of each and every template

Now that I have this list from above, I then need to run another CLI that gets the information of whats inside of each template from above. The CLI is use for this is:

./qip-getteinfo -U xx -P xx -n 194Iselin-NJ -t -o orig

The flags are:
U & P are user name and passwd
the -n is the name of the template I want to get its information
-t specifey what type of template
-o org id

So when I run this cli agianst 194Iselin-NJ the output looks like so:

template-name=194Iselin-NJ
template-type=DHCP Option Template
001=Same as in Subnet Profile
003=Same as in Subnet Profile
006=User Defined
006>User Defined=169.30.33.16 169.30.34.16
012=Same as in Object Profile
015=Same as in Subnet Profile
043=uktrq-uut-son4v-bk
051=Limited
051>Limited Lease Time=43200
066=169.30.34.62
186=169.30.34.62
187=[1f51]

What I need is a way to automate this.

I need a perl script that will run the first step, keep the names it finds some where on a text file perhaps,

Then run the next step, to reference the file names from step 1 and create a seperate file with the contents of all the names from step 1

So,

Run first part of the perl script
get the names of all the templates,

Second part of the perl script would reference the files from the first section and make a list .txt

so, the first one would be:
194Iselin-NJ

grab the contents and produce a file name 194Iselin-NJ.txt that would contain the template information of:

template-name=194Iselin-NJ
template-type=DHCP Option Template
001=Same as in Subnet Profile
003=Same as in Subnet Profile
006=User Defined
006>User Defined=169.30.33.16 169.30.34.16
012=Same as in Object Profile
015=Same as in Subnet Profile
043=uktsq-ops-sun4v-bk
051=Limited
051>Limited Lease Time=43200
066=169.30.34.62
186=169.30.34.62
187=[1f51]

Then loop and go to the next and so, on... until all the names and templates are created.

Thanks
 richsark View Public Profile for richsark Find all posts by richsark
# 2
03-23-2009
What have you tried? Where are you stuck?
# 3
03-23-2009
Hi,

I have this perl script, but not sure if it will do what I want.

This script would require me to run the first step by hand, and capture the output called "plates.txt"

Then use (part) of this script to do the rest, ( I am not sure that this will do the job) as its CHOMP line 1, where the files has lots of lines

#!/usr/bin/perl -w

open FH1, 'plates.txt' or die "Cannot open plates.txt $!"; while ($line1 = <FH1> ) {
chomp($line1); # remove new line character(s) system("qip-getteinfo -U xx -P xx -n -t -o orig -a$line1 -o ABC >> log.txt 2>&1");
}
close FH1;
 richsark View Public Profile for richsark Find all posts by richsark
# 4
03-23-2009
run it and see if it works
# 5
03-23-2009
HI, Well, the script that I have was not meant for this task.

I simply need it modified to do the request I have submitted.

I am asking that the script I have be modified.

Can you help?
 richsark View Public Profile for richsark Find all posts by richsark
# 6
03-23-2009
Quote:
Originally Posted by richsark
HI, Well, the script that I have was not meant for this task.

I simply need it modified to do the request I have submitted.

I am asking that the script I have be modified.

Can you help?
Sorry, can't help.

Test Your Knowledge in Computers #177
Difficulty: Easy
The Apple Computer Company was founded on April 1, 1976.
True or False?

## Help needed on wrapper script

Hi Gurus, I need to build a wrapper script which will be passing the loading date and the data file name (provides option to the user to load a single data file or load all the data files) to the actual loader data_load.ksh to load in the database. 1. I want to execute the loader script...

## problem with the my wrapper script

Hi friends, i am working in ksh88. i am running the follwing wapper script in background to run two jobs parallely((eg nohup wrapper.ksh &):: wrapper.ksh ######################## #!/bin/ksh nohup ./pii_insert.ksh /nsing83/p2/test & nohup ./pii_update.ksh...

## Wrapper Script in Perl Or shell

Hello, My requirement is based on Oracle where we run a perl script and it asked some questions.I want to write a wrapper which will answer all these questions. How is it possible. Thanks

## Pass parameter to the main script from wrapper script

Hi, I am writing a wrapper script(wrap_script.sh) to one of the main scripts (main_script.sh) The main script is executed as following: ./main_script.sh <LIST> <STARTDATE> <ENDDATE> looks for a parameter which is a LIST(consists of different list names that need to be processed), START/END...

## Wrapper Script Help With Perl Scripts

I have tried looking through wrapper scripts throughout the forum, but I don't think they were able to answer my question (either that or I'm just confused). Basically, I have a Perl script that I want to run in parallel 4 times with parameters, wait for all of them to finish, then run another...

## Count script wrapper help

I have this a code that I got help with for another task. I since tried to modify it to work on this task. I need someones expertise to modify it slightly and I am not sure where to start or yet fully understand the logic. I am trying to get a script to read my m-names.txt which has lots...

## Help with a wrapper script not working

Hello, I have the below wrapper script: #!/usr/bin/perl -w if ($^O eq 'MSWin32' ) {$subnet = 'c:\path\to\subnet.txt'; } else { \$subnet = '/opt/qip/wrapper-del-sub'; } open FH1, 'jj-deleted-subnets.txt' or die "Can't open 'jj-deleted-subnets.txt' ...

## Korn Shell Wrapper script

Hi Guys, I am trying write a wrapper script but I don't have any idea. I have 4 different korn shell scripts and all of them needs some parameters from command line (positional parameter). My script cant be interactive because its supposed to be automated. I am confused how can I write a wrapper...

## What is a wrapper script

I tried searching the forum ,,but couldn't locate ..Can anyone give me a link or some information about wrapper script.

## What is wrapper script and how to write

hi guys, I have a requirement to run a script 4 times with different parameter values. the 4 jobs have to run parallely which actually access different data of same table and deletes. how can i achieve this.................? Thanks in advance