foreach $name (@data) { ... # print a table row for $name }