Imagine this subroutine:

```
sub test(&&)
{
    my $cr1 = shift;
    my $cr2 = shift;
    $cr1->();
    $cr2->();
}

```

I know I can call it like: `test(\&sub1,\&sub2)`, but how can I call it like:

```
test { print 1 },{ print 2 };

```

If I say that the subroutine takes only one `&`, than sending a block will work. I don't know how to make it work with 2.

If I try to run it like that, I get:

```
Not enough arguments for main::test at script.pl line 38, near "},"

```

EDIT: is there no way of invoking without `sub`?