Select Code to Download

my $x = "Foo"  . 10;

let x = "Foo" ^ int_as_string(10)

% perl -MO=Concise -e 'my $x = "Foo" . 10;'
6  <@> leave[1 ref] vKP/REFC ->(end)
...
3        <$> const[PV "Foo10"] s ->4
4        <0> padsv[$x:1,2] sRM*/LVINTRO ->5
-e syntax OK