my $string      = '/h/plkr/3/www.plkr.org/rss.pl';

my ($type, $format, $limit, $feed) = (split '/', $string, 5)[1..4];
my @tokens      = split('/', $string);
my $compressed  =  compress($string) ; 
my $encoded     = encode_base64($compressed);