DB<22> sub tst3(\@;@) {print scalar @_}
 
  DB<23> use feature 'state'; tst3 @a, state ($x,$y)
3