$ cat yangsource.pl 
#!/usr/bin/env perl 
use strict;
use warnings;

system 'source ./script.sh';
$ ./yangsource.pl 
Can't exec "source": No such file or directory at ./yangsource.pl line 5.
$