Help for this page

Select Code to Download

Select or download this

sub get_session_id {
    require Digest::MD5;
...
        or die "Tried to read 16 bytes from /dev/urandom but got $bufl
+en";
    Digest::MD5::md5_hex( $buf );
}