{
  my @b;
  my @a = @b[1,0]; 
  print Dumper(\@a);   # $VAR1 = [ undef, undef ]
}
{
  my @b;
  my @a = (@b)[0]; 
  print Dumper(\@a);   # $VAR1 = []
}