sub foo_plus_one($) { return $_[0]+1 }