sub ($a, $b, *@rest) {} # statt:

sub {
    my $a = shift;
    my $b = shift;
    my @rest = @_;
}