Try changing it to this:
print qq|
<TABLE WIDTH="450" CELLPADDING=0 CELLSPACING=0 BORDER=1 BGCOLOR="#FFFFCC">
<input type="hidden" NAME="eventi_id" VALUE="$rec{'eventi_id'}">|;
if ($per_admin) {
print qq|$user_list |;
}
else {
print qq|<input type="hidden" NAME="userid" VALUE="$rec{'userid'}">|;
}
### ; remove this ;
print qq|
you were missing an ending ; to close off the print line here:
print qq|$user_list |;
and added an extra one before your final print statement
Hope this helps
Unoffical DBMan FAQ
http://webmagic.hypermart.net/dbman/
print qq|
<TABLE WIDTH="450" CELLPADDING=0 CELLSPACING=0 BORDER=1 BGCOLOR="#FFFFCC">
<input type="hidden" NAME="eventi_id" VALUE="$rec{'eventi_id'}">|;
if ($per_admin) {
print qq|$user_list |;
}
else {
print qq|<input type="hidden" NAME="userid" VALUE="$rec{'userid'}">|;
}
### ; remove this ;
print qq|
you were missing an ending ; to close off the print line here:
print qq|$user_list |;
and added an extra one before your final print statement
Hope this helps
Unoffical DBMan FAQ
http://webmagic.hypermart.net/dbman/