NAME

WWW::MLite::Util - Utility functions

VERSION

Version 1.01

SYNOPSIS

use WWW::MLite::Util;

DESCRIPTION

Internal utility functions

getHiTime

See function "gettimeofday" in Time::HiRes

getSID

my $sid = getSID( $length, $chars );
my $sid = getSID( 16, "m" ); # 16 successful chars consisting of MD5 hash
my $sid = getSID( 20 ); # 20 successful chars consisting of a set of chars 0-9A-Z
my $sid = getSID(); # 16 successful chars consisting of a set of chars 0-9A-Z

Function returns Session-ID (SID)

$chars - A string containing a collection of characters or code:

d - characters 0-9
w - characters A-Z
h - HEX characters 0-9A-F
m - Digest::MD5 function from Apache::Session::Generate::MD5
  - default characters 0-9A-Z

sendmail, send_mail

my $sendstatus = sendmail(
    -to         => $mlite->conf->server_admin,
    -cc         => 'foo@example.com',   ### OPTIONAL
    -from       => sprintf('"%s" <%s>',$mlite->conf->server_name,$mlite->conf->server_admin),
    -subject    => 'Subject',
    -message    => 'Message',
    
    # Encoding/Types
    -type       => 'text/plain',        ### OPTIONAL
    -charset    => 'windows-1251',      ### OPTIONAL
    
    # Program sendmail
    -sendmail   => '/usr/sbin/sendmail',### OPTIONAL
    -flags      => '-t',                ### OPTIONAL
    
    # SMTP
    -smtp       => ($mlite->conf->smtp_host || ''),    ### OPTIONAL
    -smtpuser   => ($mlite->conf->smtp_user || ''),    ### OPTIONAL
    -smtppass   => ($mlite->conf->smtp_password || ''),### OPTIONAL
    
    # Attaches
    -attach => [                        ### OPTIONAL
            { 
                Type=>'text/plain', 
                Data=>'document 1 content', 
                Filename=>'doc1.txt', 
                Disposition=>'attachment',
            },
            
            {
                Type=>'text/plain', 
                Data=>'document 2 content', 
                Filename=>'doc2.txt', 
                Disposition=>'attachment',
            },
            
            ### ... ###
        ],
);

If you need to send a letter with only one attachment:

-attach => {
    Type=>'text/html', 
    Data=>$att, 
    Filename=>'response.htm', 
    Disposition=>'attachment',
},

or

-attach => {
    Type=>'image/gif', 
    Path=>'aaa000123.gif',
    Filename=>'logo.gif', 
    Disposition=>'attachment',
},

Sending mail via "sendmail" in CTK::Util

HISTORY

See CHANGES file

AUTHOR

Serz Minus (Lepenkov Sergey) http://www.serzik.com <minus@mail333.com>

COPYRIGHT

Copyright (C) 1998-2014 D&D Corporation. All Rights Reserved

LICENSE

This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.

See LICENSE file