Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: here document to automate perl script that call script
Top Forums Shell Programming and Scripting here document to automate perl script that call script Post 302141194 by hogger84 on Thursday 18th of October 2007 04:50:31 AM
Old 10-18-2007
here document to automate perl script that call script
I am trying to use a here document to automate testing a perl script however when the perl script hits a
Code:
system(perl subscript.pl)

call, input is no longer entered into this subscript.

here is my script
Code:
$ cat test.sh
#ksh
for testcase
do
	program <<-EOF | tee -a funcscnlog.log 
	y
	functional
	2
	$testcase
	reload
	keep
	EOF
	cd log
	cp x.log x.$testcase.log
	cd ..
done
$ sh test.sh TC01 TC02 TC03

I don't really want to use expect as I don't want to install anything else on the test system.


while testing this i also found a odd out put from perl
Code:
$ cat test.pl
print "infirst ";
my $buffer = <STDIN>;
chomp($buffer);
print $buffer;
print "me";
system("perl runtest.pl");
print "\naftercall ";
my $buffer = <STDIN>;
print $buffer;
print "\n";

$ cat runtest.pl
print "\ninsubtest ";
my $buffer = <STDIN>;
chomp($buffer);
print $buffer;

$ perl test.pl
infirst a

insubtest b
bame
aftercall c
c

$

if you look closly you will see
Code:
system("perl runtest.pl");

is run before

Code:
print $buffer;
print "me";

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

How to call a perl script from a shell script

I have a perl script,Test.pl which needs arguments from command line like test.pl arg1 arg2 arg3 how can i call it from a shell script (2 Replies)
Discussion started by: anumkoshy
2 Replies

2. Shell Programming and Scripting

Call a perl script inside a shell script

Hi all, I have the following snippet of code.. #!/bin/sh echo "run perl script............" #Run the verification script perl bill_ver echo " perl script completed....." echo "rename files......" #Remove from all file in the directories test, test1, test2, test3 for f in... (3 Replies)
Discussion started by: chriss_58
3 Replies

3. Shell Programming and Scripting

call shell script from perl cgi script problem

hi,, i have perl scipt with line : system('./try.sh $t $d $m'); in shell scipt try.sh i have the line: echo $1 its not printing value of $t that i hav passed..y is it so..i am running it from apache web server (2 Replies)
Discussion started by: raksha.s
2 Replies

4. Shell Programming and Scripting

Perl cgi script to call bash script?

Novice to perl here. I have created a simple web page in perl, with only one submit button. I would like to execute a bash script on the same server when this button is clicked on. Is this possible in perl? I have spent a few days researching this and am unable to find any useful information.... (0 Replies)
Discussion started by: pleonard
0 Replies

5. Shell Programming and Scripting

how to call a bash script using perl

Hi I m new to perl. I m trying to write a perl script that calls a bash script; does anyone have a script already that they can provide or help me out? Thanks a lot. (2 Replies)
Discussion started by: adnan786
2 Replies

6. Shell Programming and Scripting

How to call expect script from Perl

I have a Perl script sub.pl, and i want to call another Expect script called sub.exp. The sub.exp will generate a text file called sub.txt, while the sub.pl called from a html form will display the content of sub.txt to the textarea on the html form. How do I call sub.exp from sub.pl??? ... (5 Replies)
Discussion started by: cxbest
5 Replies

7. Shell Programming and Scripting

shell script to call perl script problems

Ok, don't ask me why, but all calls to perl must be called by a shell script. Its really not ideal, but its what I have to work with. Calling it isnt the issue, its passing in the arguments. I have about 1000 perl scripts to call by a shell script. Right now, I'm executing the shell script... (3 Replies)
Discussion started by: regexnub
3 Replies

8. Shell Programming and Scripting

Perl script for taking inputs from one script and storing them into a document.

Hi. I wanted to create a Perl script which can take the outputs of a Perl script as it's input and temporarily store them in a document. Need help. Thanks.:) (8 Replies)
Discussion started by: xtatic
8 Replies

9. Shell Programming and Scripting

Call .profile in perl script

Hello Gurus Can anyone please let me know how to call .profle file in perl script When I am calling the .profile file its giving error Shall I create unix script which has .profile command and call perl script internally (2 Replies)
Discussion started by: Pratik4891
2 Replies

10. Shell Programming and Scripting

Call a Perl script within a bash script and store the ouput in a .txt file

I'm attempting to write a bash script that will create a network between virtual machines. It accepts three arguments: an RSpec that describes the network topology, and two list of machines (servers and clients). I have a (working) Perl script that I want to call. This Perl script takes an RSpec... (6 Replies)
Discussion started by: mecaka
6 Replies

LEARN ABOUT DEBIAN

build-lives-rfx-plugin

build-lives-rfx-plugin(1)				      General Commands Manual					 build-lives-rfx-plugin(1)

NAME

       build-lives-rfx-plugin - builds rendered effects for LiVES

SYNOPSIS

       build-lives-rfx-plugin script_name [plugin_dir] -get section file

DESCRIPTION

       This perl script is used by LiVES to compile an RFX (rendered effect) plugin for LiVES. It is generally called from build-lives-rfx-plugin-
       multi for a script which has a language code representing LiVES-perl. The script_name must be  the  full  (absolute)  path  to  the  plugin
       script,	and  plugin_dir  can  be  used to specify the output directory where the compiled plugin should be generated. If plugin_dir is not
       defined then /tmp is assumed.

       The second variant with -get is used to print out a script section from a plugin script to stdout. It is generally only used internally	by
       LiVES.

       Return values The script returns the following values

       0 - success 1 - the value of a trigger was greater than the number of parameters 2 - a value could not be read from the script file 3 - the
       language code of the plugin script was not equivalent to LiVES-perl 4 - the API version level of the plugin script  was	invalid  5  -  the
       <define> section was missing from the plugin script

SEE ALSO

       build-lives-rfx-plugin-multi(1), lives(1)

AUTHOR

       Gabriel Finch a.k.a Salsaman (salsaman@xs4all.nl)

								    May 9 2010						 build-lives-rfx-plugin(1)
All times are GMT -4. The time now is 10:35 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy