DB<11> sub op { $_[0] += $_[1] }

  DB<12> $x=4

  DB<13> op($x,5)

  DB<14> p $x
9
  DB<15>