Perl Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++CMFCDelphiFoxProJavaPerlPHPPythonRubySQL ServerVBScript

Perl Examples

Quick Start
Unicode
Byte Array
Bz2
Certificates
CSV
Email
Encryption
FTP
HTML-to-XML
HTTP
IMAP
MHT
MIME
POP3
RSA
S/MIME
Signatures
SMTP
Socket / SSL
Spider
SFTP
SSH Key
SSH
SSH Tunnel
Tar
HTTP Upload
XML
XMP
Zip

More Examples...
String
Email Object
DKIM / DomainKey
NTLM
FileAccess
RSS
Atom
Self-Extractor
Service
PPMD
Deflate
DH Key Exchange
DSA
Bzip2
LZW

 

 

 

 

 

 

 

Send S/MIME Signed and Encrypted Email

Sending a signed and encrypted email is as easy as setting both the SendEncrypted and SendSigned properties. The email is signed using the private key of the sender's certificate, and encrypted using the public key of the recipient's certificate.

Download Chilkat Perl Module

use chilkat;


# The mailman object is used for sending and receiving email.
$mailman = new chilkat::CkMailMan();

# Any string argument automatically begins the 30-day trial.
$success = $mailman->UnlockComponent("30-day trial");
if ($success != 1) {
    print "Component unlock failed" . "\n";
    exit;
}

# Set the SMTP server.
$mailman->put_SmtpHost("smtp.comcast.net");

# Create a new email object
$email = new chilkat::CkEmail();

$email->put_Subject("This email is signed and encrypted");
$email->put_Body("This is a digitally signed and encrypted mail");
$email->put_From('Chilkat Support <admin@chilkatsoft.com>');
$email->AddTo("TagTooga",'admin@tagtooga.com');

# To send signed and encrypted email, set both
# SendSigned and SendEncrypted:
$email->put_SendSigned(1);
$email->put_SendEncrypted(1);

$success = $mailman->SendEmail($email);
if ($success != 1) {
    print $mailman->lastErrorText() . "\n";
}
else {
    print "Mail Sent!" . "\n";
}

 

Need a specific example? Send a request to support@chilkatsoft.com

© 2000-2010 Chilkat Software, Inc. All Rights Reserved.