Call a bash script from a perl script

Question

I am trying a code in perl script and need to call another file in bash. Not sure, which is the best way to do that? can I directly call it using system() ? Please guide/ show me a sample way.

from what I have tried so far :

     #!/usr/bin/perl
     system("bash bashscript.sh");

Bash :

#!/bin/bash
echo "cdto codespace ..."
cd codetest
rm -rf cts
for sufix in a o exe ; do
echo ${sufix}
find . -depth -type f -name "*.${sufix}" -exec rm -f {} \;
done

I am getting an error when I execute the perl script : No such file or directory codetest

syntax error near unexpected token `do

yes, you can using system("bash -c script.sh"), for example — 2r2w
– 2r2w, Commented Jul 24, 2012 at 18:07
@IgorChubin you're right , but if script has execution than bash -c is ok too — 2r2w
– 2r2w, Commented Jul 24, 2012 at 19:25
I solved my first problem according to stackoverflow.com/questions/255414/… : alias proj="cd /home/tree/projects/java" (Thanks to @Greg Hewgill) — iDev
– iDev, Commented Jul 24, 2012 at 21:48
Possible duplicate of How can I call a shell command in my Perl script? — jww
– jww, Commented Jul 25, 2019 at 10:54

Igor Chubin · Accepted Answer · 2012-07-24 18:36:09Z

11

If you just want run you script you can use backticks or system:

$result = `/bin/bash /path/to/script`;

or

system("/bin/bash /path/to/script");

If your script produces bug amount of data, the best way to run it is to use open + pipe:

if open(PIPE, "/bin/bash /path/to/script|") {
  while(<PIPE>){
  }
}
else {
  # can't run the script
  die "Can't run the script: $!";
}

edited Jul 24, 2012 at 18:36

answered Jul 24, 2012 at 18:12

Igor Chubin

65.1k14 gold badges132 silver badges148 bronze badges

Sign up to request clarification or add additional context in comments.

6 Comments

jordanm Over a year ago

Good answer, but /bin/sh may not be bash, and if it is bash will run in --posix mode.

ikegami Over a year ago

No reason to run sh just to launch bash: system("/bin/bash", "/path/to/script"); and open(my $PIPE, '-|', "/bin/bash", "/path/to/script") would avoid this.

2r2w Over a year ago

also just `bash script.sh` could be used

MrPickles Over a year ago

@IgorChubin What does the $! do at the end of your code? I'm unfamiliar with Perl.

MrPickles Over a year ago

@IgorChubin Is the | necessary at the end of `"/bin/bash /path/to/script|")? What does that do?

|

newfurniturey · Accepted Answer · 2012-07-24 18:08:29Z

1

You can use backticks to execute commands:

$command = `command arg1 arg2`;

There are several other additional methods, including system("command arg1 arg2") to execute them as well.

Here's a good online reference: http://www.perlhowto.com/executing_external_commands

answered Jul 24, 2012 at 18:08

newfurniturey

38.6k10 gold badges99 silver badges104 bronze badges

Comments

Community · Accepted Answer · 2017-05-23 11:51:42Z

1

You can use backticks, system(), or exec.

  system("myscript.sh") == 0
    or die "Bash Script failed";

1 Comment

sidyll Over a year ago

backticks in void context… use system() and save some extra work.

Community · Accepted Answer · 2017-05-23 12:01:02Z

1

I solved my first problem according to Why doesn't "cd" work in a bash shell script? :

alias proj="cd /home/tree/projects/java"

(Thanks to @Greg Hewgill)

edited May 23, 2017 at 12:01

CommunityBot

11 silver badge

answered Jul 24, 2012 at 21:51

iDev

2,45312 gold badges45 silver badges72 bronze badges

Collectives™ on Stack Overflow

Call a bash script from a perl script

4 Answers 4

6 Comments

Comments

1 Comment

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

4 Answers 4

6 Comments

Comments

1 Comment

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related