@a = ()[0..50];
print $#a;