Opened by bianca at 2011-12-10 13:48
User since
2011-03-19
3245 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
2011-03-19
3245 Artikel
BenutzerIn
IO::File und MIME::Base64
Zum Encoden der Datei den eingelesenen Datenstrom puffern:
Die Pufferlänge muss nur durch 3 teilbar sein. Mi o.g. Pufferlänge kriegst Du genau 76 Zeichen als encoded String, mit dem Faktor 4/3 kannst Du Dir auch andere Längen erzeugen.
Zum Encoden der Datei den eingelesenen Datenstrom puffern:
Code (perl): (dl
)
1 2 3
while(read $handle, my $buffer, 57){ $b64 .= encode_base64($buffer); # default trailer "\n" }
Die Pufferlänge muss nur durch 3 teilbar sein. Mi o.g. Pufferlänge kriegst Du genau 76 Zeichen als encoded String, mit dem Faktor 4/3 kannst Du Dir auch andere Längen erzeugen.