# define $#array

@a  = 1..5;

print scalar @a, "\n";

$#a++ for 1..5;

print scalar @a, "\n";