for my $c (1..$data->{n1}) {