# Nervige Fehlermeldungen beim parsen von Excel-Dateien ausblenden, ohne
    # zu wissen was ich da eigentlich genau schraube. Jetzt gibt es immerhin
    # nur noch die Warnung, dass die Funktion neu definiert wurde.
    if ($Spreadsheet::ParseExcel::VERSION <= 0.2603) {
        package Spreadsheet::ParseExcel::FmtDefault;
        *TextFmt = sub($$;$) {
            my($oThis, $sTxt, $sCode) =@_;
            return $sTxt if((! defined($sCode)) || ($sCode eq '_native_'));
            #return pack('C*', unpack('n*', $sTxt));
            return pack('U*', unpack('n*', $sTxt));
        };
    }