experimental uudecode.pl for Perl 4 and 5

Does not use unpack('u',...), this is going to be a prototype for the
awk version, if that doesn't work out we'll use the perl version with
other fallbacks like base64.