my $subref = \&bar; 
$subref->(@a1);    # Doesn't act like bar(@a1)...