my @a=((),(),()); printf "%d\n", scalar @a; #### printf "%d\n", scalar map {()} 1..3;