$ perl -MO=Concise,-exec -e'my $x = log(2);'
1  <0> enter v
2  <;> nextstate(main 1 -e:1) v:{
3  <$> const[NV 0.693147180559945] s/FOLD
4  <1> padsv_store[$x:1,2] vKS/LVINTRO
5  <@> leave[1 ref] vKP/REFC
-e syntax OK