Simple URI Encode/Decode using Perl