I found a solution. If someone looks at this post some time from now, here it is).
the problem was pretty simple (finding the solution took me two days, but this is because I don't know about perl at all). Here is the code that works:
if (($db_userid eq $rec{'Userid'}) && ($per_del)) {
print qq! [record information] !;
The problem was that I need to check if a user owns the record AND (instead of OR, notice && instead of || ) if he has delete rigths...
Hope this prevents another newbie from spending two days for such task and Thanks for the help
the problem was pretty simple (finding the solution took me two days, but this is because I don't know about perl at all). Here is the code that works:
if (($db_userid eq $rec{'Userid'}) && ($per_del)) {
print qq! [record information] !;
The problem was that I need to check if a user owns the record AND (instead of OR, notice && instead of || ) if he has delete rigths...
Hope this prevents another newbie from spending two days for such task and Thanks for the help