Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re^4: Randomness encountered with CGI Session

by afoken (Parson)
on Jun 13, 2010 at 08:09 UTC ( #844411=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my $md5 = new Digest::MD5();
    $md5->add($$ , time() , rand(time) );
    return $md5->hexdigest();
    
  2. or download this
        my $IDFile = $args->{IDFile} or croak "Don't know where to store t
    +he id";
        my $IDIncr = $args->{IDIncr} || 1;
    ...
        print FH $ID;
        close(FH) or return $self->set_error("Couldn't close IDFile=>$IDFi
    +le: $!");
        return $ID;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://844411]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (7)
As of 2014-11-28 17:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (199 votes), past polls