Quoted Printable encode/decode bash aliases - suitable for pipelining

gistfile1.txt

# To decode:
#   qp -d string 
# To encode:
#   qp string

alias qpd='perl -MMIME::QuotedPrint -pe '\''$_=MIME::QuotedPrint::decode($_);'\'''
alias qpe='perl -MMIME::QuotedPrint -pe '\''$_=MIME::QuotedPrint::encode($_);'\'''
function qp {
if [[ "$1" = "-d" ]]
then
	echo ${@:2} | qpd
else
	echo ${@} | qpe
fi
}

Good call, thanks! I tend to use them mostly in one liners so I can pipeline to other tools easily, but that's a good point worth noting.

Alternatively, use Python's quopri module:

$ echo "Jeg liker å sykle" | python -m quopri
Jeg liker =C3=A5 sykle

$ echo "Jeg liker =C3=A5 sykle" | python -m quopri -d
Jeg liker å sykle

@Hubro: this should be the accepted answer!

(oh wait, I'm not on stackoverflow?)

the perl version can be much simple:

qp () {
    perl -MMIME::QuotedPrint -s -ne '
        BEGIN { *e = $d ? \&decode_qp : \&encode_qp }
        print e $_
    ' -- "$@"
}

qp /etc/hostname - /etc/hostname <<< ∀✓ | qp -d

qprint --decode and qprint --encode are easy to use.