Did you know perl can natively uudecode using pack()? No need for an extra module then.
Yeah, I know, but why re-invent the wheel? The main reason I wrote this was to have something that could handle a single file that contains (possibly) more than one uuencoded file, and possibly News headers, which uudecode (1) doesn't handle all that well. uudecode (1) will only decode the first chunk of data that it finds in a text file, and only if it's in one piece (if there's header info in the middle, in the case of a file that was split before being posted, forget about it). This script works around that. Anyway, it's useful to me; YMMV.