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