$ perl -le'print "3$ARGV[0]4";' +
3+4

$ perl -le'print eval "3$ARGV[0]4"' +
7

$ perl -le'print eval "3$ARGV[0]4"' '*'
12