Help for this page
my $self = shift if (ref $_[0]); my($arg1,$arg2,$arg3)=@_;
sub foo { ... (1)(a1)(a2)(a3) (2)(a3)(a4)(a5)