foreach $k (@data) {