Embedding a bash funtion in perl script

nayabrahil has asked for the wisdom of the Perl Monks concerning the following question:

Hello Masters,
I would be glad if someone could tell me how to embed bash function in perl. Also how to call them.
For example:
##function body
function name {
echo "name is nayab rahil"
}

##function call.
name

__________________________________

I am using backtick to run the below function but i always get this error

`function forloop {
for ((a=1;a<=5;a++))
var="$a"
echo "$var"
done
}`

$result=`forloop`;

I want to make a function of the above for loop and run it. Also it should be embedded in perl script only.

Please help!!!

Comment on Embedding a bash funtion in perl script

Replies are listed 'Best First'.
Re: Embedding a bash funtion in perl script by choroba (Cardinal) on Oct 21, 2013 at 23:53 UTC
Shell functions cannot be trully embedded into Perl code. There are several reasons why your code does not work: Function definition must contain parentheses in a shell. There is a missing `do` after the `for`. There is a missing semicolon after the first backquotes. The main problem: each backquotes are run in a separate subshell. You cannot define a function in one subshell and run it in a different one (if it is not its subshell). You can store the definition in a Perl variable, though, and prepend it to any code that needs to use it (note that backquotes interpolate variables): my $f = 'forloop () { for ((a=1;a<=5;a++)) ; do var="$a" echo "$var" done }'; my $result=`$f; forloop`; print $result; [download] Nevertheless, usually implementing the whole logic in Perl might get you the clearest code. لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ	[reply] [d/l] [select]
Re: Embedding a bash funtion in perl script by keszler (Priest) on Oct 22, 2013 at 07:57 UTC
XY Problem ?	[reply]
Re: Embedding a bash funtion in perl script by nayabrahil (Novice) on Oct 31, 2013 at 11:47 UTC
Thank You for your explanation. That was helpful.	[reply]