sub foo(\@) { ...} 

foo(@a);              # Passes \@a

my $subref = \&foo;
$subref->(@a);        # Passes $a[0]