#!/usr/bin/perl

use LWP::Simple;

my $page = get("http://www.cgiscript.net/encrypt_index.htm"); 
print "uri_unescape $page";