while (my $ref = $sth->fetchrow_hashref()) { if ($ref->{multiple}) { foreach my $i (1 .. $number_of_members) { my $new_name = "member" . $i . "_" . $ref->{name}; $ref->{name} = $new_name; $ref->{label} = "Member # $i" . " " . $ref->{label}; push @names, $ref; } } else { push @apps, $ref; } } push @names, @apps; #### member1_first_name ($ref->{name}) Member #1 First Name ($ref->{label}) member2_last_name Member #2 Last Name ...up to # of members #### member2_member1_first_name Member #2 Member #1 First Name member2_member1_first_name Member #2 Member #1 First Name member2_member1_last_name Member #2 Member #1 Last Name member2_member1_last_name Member #2 Member #1 Last Name