Fork and Edit

Blob Blame History Raw

print "use Filter::UUdecode ;\n" ;
while (<>) {
    print pack("u", $_) ;
}