quoted-printable en/decoder, to complement base64

[jidanni]

There should be a quoted-printable en/decoder, to complement base64.
Let's see what I was using for all these.
#!/bin/sh -e
#jidanni  *** replacement for mime-codecs package ***
case $0 in
    *qp-encode)    perl -MMIME::QuotedPrint -wne 'print encode_qp($_)';;
    *qp-decode)    perl -MMIME::QuotedPrint -wne 'print decode_qp($_)';;
    *base64-encode)perl -MMIME::Base64      -wne 'print encode_base64($_)';;
    *base64-decode)perl -MMIME::Base64      -wne 'print decode_base64($_)';;
    *)exit 88;;
esac