$ THEORB2="|fgrep -e THE -e B2"
$ perl -we'print join ":", @ARGV' $THEORB2
|fgrep:-e:THE:-e:B2
$ perl -we'print join ":", @ARGV' "$THEORB2"
|fgrep -e THE -e B2