print scalar @array, "\n";