Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
MIME Encodings - Base64, Quoted-Printable, 8bit
Perl sample script showing how to create MIME using different encoding schemes. # file: mimeEncodings.pl # Perl MIME parsing script / create MIME in Perl. use chilkat; # Demonstrates how to use different content-transfer-encodings # such as quoted-printable, base64, and 8bit. $mime = new chilkat::CkMime(); $mime->UnlockComponent("anything for 30-day trial"); $mime->put_Charset("iso-8859-1"); # Begin with 8bit. $mime->put_Encoding("8bit"); # Add some Danish text... $mime->SetBodyFromPlainText("Jeg kan spise glas, det gør ikke ondt på mig."); print $mime->mime() . "\n\n"; # This MIME is created: # # content-transfer-encoding: 8bit # content-type: text/plain; # charset="iso-8859-1" # # Jeg kan spise glas, det gør ikke ondt på mig. # Change the encoding to base64: $mime->put_Encoding("base64"); print $mime->mime() . "\n\n"; # The MIME is now in base64 format: # # content-type: text/plain; # charset="iso-8859-1" # content-transfer-encoding: base64 # # SmVnIGthbiBzcGlzZSBnbGFzLCBkZXQgZ/hyIGlra2Ugb25kdCBw5SBtaWcu # Change the encoding to quoted-printable: $mime->put_Encoding("quoted-printable"); print $mime->mime() . "\n\n"; # The MIME is now in quoted-printable format: # # content-type: text/plain; # charset="iso-8859-1" # content-transfer-encoding: quoted-printable # # Jeg kan spise glas, det g=F8r ikke ondt p=E5 mig. |
© 2000-2010 Chilkat Software, Inc. All Rights Reserved.