deparse: my($f, $g) = (6, 7);

consise:
x     <2> aassign[t11] vKS ->y
-        <1> ex-list lKP ->u
r           <0> pushmark s ->s
s           <$> const(IV 6) s ->t
t           <$> const(IV 7) s ->u
-        <1> ex-list lKPRM* ->x
u           <0> pushmark sRM* ->v
v           <0> padsv[$f:5,7] lRM*/LVINTRO ->w
w           <0> padsv[$g:5,7] lRM*/LVINTRO ->x