$ eval `perl -e 'print "FOO=bar"'`
$ echo $FOO
bar