»Quoted Printable« in Text umcodieren

#!/usr/bin/perl
########################################################################
#
# qpdecode
# Decode quoted printable as used in email-
#
# $Id: qpdecode,v 1.1 2022/08/18 09:10:57 elias Exp $
#
########################################################################

use strict;
use warnings;
use MIME::QuotedPrint;

$/="";
print decode_qp(<>);