One of the first rules of debugging is to make it as simple as possible. Try putting just a print statement into  test_script.pl Then do a simple print STDOUT "test"; to get a value into $Result.

Remember the KISS principle.