$ eval `your_perl_script.pl`
$ echo $FOO
bar
$