can we source a shell script in perl script

Question

can we source a shell script in the perl script??

Example: Program 1:

cat test1.sh
#!/bin/ksh
DATE=/bin/date

program 2:

<         


        

Answer 1

You can do something simple, like this:

system "source /path/to/shell_env.sh &&"
     . "/path/to/script.sh";

NOTE that this is different than the following which is not recommended:

   system "source /path/to/shell_env.sh &&"
        . "/bin/sh /path/to/script.sh";