my @a=((),(),());
printf "%d\n", scalar @a;