do { local @_;
     alias $_[0] = ++$foo;  # aliases to $foo
     alias $_[1] = $foo++;  # aliases to anon 1
     &sum                   # 2+1
   }