perl -le '$x = 42; eval q($x = 6*9); print $x' # prints "54"