my @arr = ( map { }, 1 .. $arr_len );