Perl Tiny Url