MIME64
Petr Kolar
PETR.KOLAR na vslib.cz
Pátek Září 4 15:14:56 CEST 1998
"Pavel Kubenka" <kubenka na uno.pvt.cz> wrote:
> Dobry den,
> mam soubory zakodovane MIME64 a potreboval bych je na unixu dekodovat. Je
> nekde takovy dekoder (zdrojaky) - potrebuju to pro Digital Unix.
#!/usr/bin/perl
while (<>) {
tr#A-Za-z0-9+/##cd;
tr#A-Za-z0-9+/# -_#;
$len=pack("c", 32+0.75*length);
print unpack("u", $len . $_);
}
Musi se tomu predhodit jenom ta za-Base64-ovana cast, bez hlavicek atd.
--
*** Petr Kolar ***
Department of Information Technologies, Technical University of Liberec
Voronezska 1329, 461 17 Liberec, Czech Republic
Phone: +420-48-535-2371 Fax: +420-48-535-2229
E-mail: Petr.Kolar na vslib.cz http://asterix.vslib.cz/staff/kolar.html
Další informace o konferenci Linux