Select Code to Download

1 use CGI qw(:all delete_all escapeHTML);
2
...

    Digest::MD5::md5_hex(Digest::MD5::md5_hex(time().{}.rand().$$));
}