[% IF cnt > 0 %]
##
if( $user->id){
my $usr = $user->id;
my @userchecklist_id;
my $check_ = "chck";
my $chck_ = "check";
my $quer = "SELECT checklist.id FROM group_management,User_group_management_mapping,profiles,checklist,checklist_group_mapping WHERE User_group_management_mapping.userid = $usr and profiles.userid = User_group_management_mapping.userid and group_management.id =User_group_management_mapping.groupid and checklist_group_mapping.checklist_id = checklist.id and checklist_group_mapping.group_id = group_management.id";
my $query = $dbh -> prepare($quer);
$query-> execute();
while(my($usrcheck_id) = $query->fetchrow_array())
{
push (@userchecklist_id,$usrcheck_id);
}
foreach $usr( @userchecklist_id) {
#print $usr . "\n";
#print $check_.$usr;
my $check_.$usr = $cgi->param("$chck_.$usr");
print $chck_.$usr;
}
}