$ret_val = system("perl $ENV{SOURCE_ROOT}/scripts/Test_script.pl");

##</code><code>##

$line =~ s|\perl \$ENV{SOURCE_ROOT}/scripts/Test_script.pl|\$ENV{SOURCE_ROOT}/scripts/Test_script|si;

##</code><code>##

Can't find unicode character property definition via main->e or e.pl at unicode/Is/e.pl line 41