Guest hcx

Code (perl): (dl )

1
2
3
4
5
6
7
8
9
10
11
12

sub SENDEMAIL {
        $absender = new Mail::Sender
        (
                {
                        from => 'hackbox@gmx.net',
                        mail => 'mail.gmx.net',
                        authid => 'hackbox@gmx.net',
                        authpwd => 'cr-pup40.zip',
                        debug => $DEBUG,
                        auth => 'LOGIN'
                }
        );