$num += scalar @{$_} for @array;