sorry long way I wasn't here here is my answer.
just exapmle I'm not passing in this way..
And the people can use both ways, why not ..i.e.

sub mysub ($self)
{
 my @rest = @_;
}

sub mysub ($self,$nextvar1,$nextvar2)
{
...
}
[download]

instead of :

sub mysub
{
 my ($self,@rest) = @_;
}

OR
sub mysub
{
 my $self = shift;
 ...some code .. $nextvar1 = shift;
 ...code ... 
 $nextvar2 = shift;
}
[download]

for me the first is much more clear... and can be used to document what the creator of this sub mostly expected like parameters.. with one RegEx U can extract a desc of methods and so on... this is JMO