`perl /home/com/begp/test_script.pl $f`  || die "Error!";  
# Note the $f position before the backtick.