Login or Register to Ask a Question and Join Our Community


Shell Programming and Scripting

perl inside shell script?

Login to Discuss or Reply to this Discussion in Our Community

 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting perl inside shell script?
# 8  
Old 12-06-2010
Actually the technique called "Here Document" or "heredoc" will do the trick. The string EOF could be anything that is not a reserved word. The lines between << 'EOF' and the line containing only EOF are fed to perl as standard input. Any way to feed perls standard input works, like:
Code:
#!/usr/bin/ksh

echo "This is the shell script"

echo 'use strict; use warnings; my $var = "This is perl\n"; print $var;' |perl

echo "This is the shell script again"

If you want to reuse the perl-code in another script I'd put the code in a seperate perl-script and call that from within your shellscript.
Code:
echo "This is the shell script"

perl -w /path/to/your/perlscript.pl

echo "This is the shell script again"
Login or Register to Ask a Question

Previous Thread | Next Thread

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Capture run time of python script executed inside shell script

I have bash shell script which is internally calling python script.I would like to know how long python is taking to execute.I am not allowed to do changes in python script.Please note i need to know execution time of python script which is getting executed inside shell .I need to store execution... (2 Replies)
Discussion started by: Adfire
2 Replies

2. Shell Programming and Scripting

Perl inside shell

I am trying to find out the difference between two dates, for which I am using perl inside SHELL. Below are my codes. perl -MDate -e 'Date::Calc qw(Delta_DHMS);' perl -e '($Dd,$Dh,$Dm,$Ds) = Delta_DHMS($year1,$month1,$day1, $hour1,$min1,$sec1, $year2,$month2,$day2, $hour2,$min2,$sec2)' But... (6 Replies)
Discussion started by: sauravrout
6 Replies

3. Programming

Executing a awk command inside perl script --

Hello experts I want to execute a awk command, which reads from txt files and sums the numbers from the first column for those listed only inside a <init> block -- The awk command is like awk '/<\/?init>/{x = !x}x{a++}x && a > 2{sum+=$1}END{printf"%E" "\n", sum} So, I want to execute... (2 Replies)
Discussion started by: Alkass
2 Replies

4. Shell Programming and Scripting

Shell script inside a perl script

How to write a shell script inside a perl script code? It is possible or not. Actually i have a perl script code and i need some values from the shell script code and vice-versa i.e. some values of shell script use by the perl scipt and some values of perl script use by the shell script. So how can... (1 Reply)
Discussion started by: anupdas
1 Replies

5. Shell Programming and Scripting

how to run shell script inside expect script?

I have the code like this : shell script continues ... .... expect -c" spawn telnet $ip expect "login:" send \"$usrname\r\" expect "Password:" send \"$passwd\r\" expect "*\>" send \"$cmdstr\r\" ... (1 Reply)
Discussion started by: robbiezr
1 Replies

6. 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

7. Shell Programming and Scripting

invoking a shell script inside cgi shell script

Hi, I have an HTML form through which I get some text as input. i need to run a shell script say script.sh inside a perl-cgi script named main_cgi.sh on the form input. I want to write the contents of the form in a file and then perform some command line operations like grep, cat on the text... (2 Replies)
Discussion started by: smriti_shridhar
2 Replies

8. Shell Programming and Scripting

Run the command inside perl script

I have a command which will run fine in a unix command prompt. Can you tell how to interprete this command inside perl script...... The command is : perl -pe 's/(\|333\}.*)\}$/$1|1.6}/' FIA.txt This will search for the number 333 and appends 1.6 at the end of that line....... (1 Reply)
Discussion started by: vinay123
1 Replies

9. Shell Programming and Scripting

How to run unix commands in a new shell inside a shell script?

Hi , I am having one situation in which I need to run some simple unix commands after doing "chroot" command in a shell script. Which in turn creates a new shell. So scenario is that - I need to have one shell script which is ran as a part of crontab - in this shell script I need to do a... (2 Replies)
Discussion started by: hkapil
2 Replies

10. Shell Programming and Scripting

calling a C executable from inside a Perl script

here's the Perl code snippet... how can i call my C executable 'porter-stemmer' and pass it $1 as an argument? Thanks for the help! # Read through the original topic set, and modify based on the current # pre-processing options while (<TOPIC_ORIG>) { # Run pre-processing over only the... (3 Replies)
Discussion started by: mark_nsx
3 Replies
Login or Register to Ask a Question

LEARN ABOUT DEBIAN

perl::critic::policy::valuesandexpressions::prohibitimplicitnewl

Perl::Critic::Policy::ValuesAndExpressions::ProhibitImplUserNContributed)Perl::Critic::Policy::ValuesAndExpressions::ProhibitImplicitNewlines(3pm)

NAME

       Perl::Critic::Policy::ValuesAndExpressions::ProhibitImplicitNewlines - Use concatenation or HEREDOCs instead of literal line breaks in
       strings.

AFFILIATION

       This Policy is part of the core Perl::Critic distribution.

DESCRIPTION

       Strings with embedded line breaks are hard to read.  Use concatenation or HEREDOCs instead.

	   my $foo = "Line one is quite long
	   Line two";					 # Bad

	   my $foo = "Line one is quite long
Line two"; # Better, but still hard to read

	   my $foo = "Line one is quite long
"
	       . "Line two";				   # Better still

	   my $foo = <<'EOF';				 # Use heredoc for longer passages
	   Line one is quite long
	   Line two
	   Line three breaks the camel's back
	   EOF

CONFIGURATION

       This Policy is not configurable except for the standard options.

AUTHOR

       Chris Dolan <cdolan@cpan.org>

CREDITS

       Initial development of this policy was supported by a grant from the Perl Foundation.

COPYRIGHT

       Copyright (c) 2007-2011 Chris Dolan.  Many rights reserved.

       This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.  The full text of this license
       can be found in the LICENSE file included with this module.

perl v5.14.2							    2012-Perl::Critic::Policy::ValuesAndExpressions::ProhibitImplicitNewlines(3pm)