for my $i5 (1 .. $#data) {