Select Code to Download

use Crypt::RC4;
use URI::Escape;
$code = "$ENV{REMOTE_ADDR}\|$time\|$username\|$password";
$encoded = RC4( "my_passphrase", $code );
$escaped = uri_escape( $encoded );