First, and most important, you should use placeholders instead of inserting Perl variables directly into SQL. Your code will break, for example, if HTTP_USER_AGENT or HTTP_REFERER contain an apostrophe (both of these values are under user control). Serious security risks can occur if you ignore this issue. For info, google SQL injection.
As a minor matter, you can avoid quoting literal hash keys if they are made up of all word characters (i.e. match /^\w+$/). For example, you can say <code>$Session->{idSession}. I see you did that one place.
In reply to Re: code snippet
by Thelonius
in thread code snippet
by grashoper
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |