sub foo { print shift }
  sub bar { &foo; print @_ } # BAD!