Do what you can to change that parameter.

It will help you more than a little right now, and we just can't estimate how much it will help in the future.

Cheers, Sören

This won't be speedy but you could use fewer rands by adapting your original approach.

print new_session_id(), $/;

sub new_session_id {
    my $id = '';
    for ( 1 .. 32 ) {
        $id .=  sprintf "%x", rand(16);
    }
    return $id;
}
[download]

You should also see if you've got Digest/Digest::MD5 available on your system. You can do something like:

use Digest::MD5 "md5_hex";

my @user_info = map { $ENV{$_} }
   grep { /USER|REMOTE/ } keys %ENV;

print md5_hex( rand() . join('', @user_info) );
[download]

Don't forget to do a search for unique ID too, there are many points of departure: Google on the pen for "unique id." Also, try vanilla "unique."

Well, I'm using this method, right now:


• When user A signs up, a new row is added to the MySQL table with their info.
• They have a unique ID number assigned to them(3,4,etc) that auto-increments.
• I then encrypt their ID number, using a cryptsalt of x. This becomes their unique session ID.

---

My Website
Get Eated!