*mysub = sub : prototype(\@\@) ($left,$right) { ... };