NOVELL TECHNICAL INFORMATION DOCUMENT TITLE: Send mail using perl scripts TID #: 2949842 README FOR: sdmail1b.exe SUPERSEDES: sdmail1a.exe NOVELL PRODUCTS and VERSIONS: Netscape Enterprise Server for NetWare ABSTRACT: This file is intended to assist web developers by providing the perl components to send smtp mail via perl script. There was a text modification to the sendmail.html file. Search: Novonyx Enterprise sendmail send mail perl smtp ----------------------------------------------------------------- DISCLAIMER THE ORIGIN OF THIS INFORMATION MAY BE INTERNAL OR EXTERNAL TO NOVELL. NOVELL MAKES ALL REASONABLE EFFORTS TO VERIFY THIS INFORMATION. HOWEVER, THE INFORMATION PROVIDED IN THIS DOCUMENT IS FOR YOUR INFORMATION ONLY. NOVELL MAKES NO EXPLICIT OR IMPLIED CLAIMS TO THE VALIDITY OF THIS INFORMATION. ----------------------------------------------------------------- INSTALLATION INSTRUCTIONS: Some files may be replaced or overwritten, backing up files is recommended. Do the following with the extracted contents of this kit: Copy the contents of the perl\lib subdirectory to sys:perl\lib Copy the contents of the perl\scripts subdirectory to sys:perl\scripts Copy the contents of the perlroot directory to sys:novonyx\suitespot\docs\perlroot\ directory. Copy the contents of the perldocs directory to sys:novonyx\suitespot\docs\perldocs\ directory. Modify your sys:etc\hosts file to include the mail handler at you location, ie: nnn.nnn.nnn.nnn mh.company.com Modify the sendmail.html, replacing your_email@your_company.com with the email address that you would like the feedback to go to. Modify the sendmail.pl line, replace 'mh.novell.com' with your mail handlers DNS name. Modify the sendmail_static.pl as desired, the only lines that you need to alter are as follows: my($mailTo) = 'my_email@my_company.com'; my($mailServer) = 'mh.my_company.com'; my($mailFrom) = 'John'; my($realName) = "John S. Doe"; my($subject) = 'This subject line'; my($body1) = "This is the first section of the message body.\n"; my($body2) = "This is the second section of the message body.\n"; These instructions are specific to using the html front end and scripts supplied with this kit: sendmail.pl, presendmail.pl and sendmail.html Read Me for the "Form data to sendmail" scripts: 3 files are needed: 1. Your html form (demo provided as sendmail.html) with at least the following fields: recipient (could be hidden) - the person who is to receive the email with the form data (usually the webmaster) subject (hidden) - the subject line that will appear on the email sendername - the sender's (the person filling out the form) literal name senderemail - the sender's (the person filling out the form) email address link1 - the URL for a link at the bottom of the return HTML page (could be relative) ie link1="/index.html" or link1="http://www.MySite.com/formpage.html" link2 - the text for the url in link1 ie link2="Back to the Home Page" The form tag for this form will look like this:
2. presendmail.pl (must physically reside in your perlroot directory) This script takes the form data, preprocesses it and sends it to sendmail. This script also formats a return HTML message for the viewer after the form data is sent. 3. sendmail.pl (must physically reside in your perlroot directory) This is the script that sends the mail. ISSUE: There was a need to provide a method of sending mail via the web server. this method uses perl scripting and/or html front end. This file contains a zipped executable because of long file names. It contains the following: Directory of \ 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a perl 04/07/99 11:42a perldocs 04/07/99 11:42a perlroot 5 File(s) 0 bytes Directory of \perl 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a lib 04/07/99 11:42a scripts 4 File(s) 0 bytes Directory of \perl\lib 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a auto 04/07/99 11:42a file 04/07/99 11:42a getopt 04/07/99 11:42a io 04/07/99 11:42a math 04/07/99 11:42a text 04/07/99 11:42a tie 04/07/99 11:42a 8,213 bigint.pl 04/07/99 11:42a 2,688 carp.pm 04/07/99 11:42a 3,789 cgi-lib.pl 04/07/99 11:42a 906 cgi.pm 04/07/99 11:42a 3,788 cgilib.pl 04/07/99 11:42a 6,393 config.pm 04/07/99 11:42a 20,053 dynaloader.pm 04/07/99 11:42a 3,342 english.pm 04/07/99 11:42a 1,578 env.pm 04/07/99 11:42a 12,457 exporter.pm 04/07/99 11:42a 2,155 fatal.pm 04/07/99 11:42a 1,694 fcntl.pm 04/07/99 11:42a 1,733 filecache.pm 04/07/99 11:42a 664 help.pm 04/07/99 11:42a 15,177 overload.pm 04/07/99 11:42a 1,654 prodinfo.pm 04/07/99 11:42a 436 sdbm_file.pm 04/07/99 11:42a 1,078 selectsaver.pm 04/07/99 11:42a 7,566 socket.pm 04/07/99 11:42a 3,000 strict.pm 04/07/99 11:42a 2,290 symbol.pm 04/07/99 11:42a 1,442 vars.pm 31 File(s) 102,096 bytes Directory of \perl\lib\auto 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a fcntl 04/07/99 11:42a io 04/07/99 11:42a sdbm_file 04/07/99 11:42a socket 6 File(s) 0 bytes Directory of \perl\lib\auto\fcntl 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 22,297 fcntl.nlp 3 File(s) 22,297 bytes Directory of \perl\lib\auto\io 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 17,564 io.nlp 3 File(s) 17,564 bytes Directory of \perl\lib\auto\SDBM_File 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 21,360 sdbm_file.nlp 3 File(s) 21,360 bytes Directory of \perl\lib\auto\Socket 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 29,039 socket.nlp 3 File(s) 29,039 bytes Directory of \perl\lib\file 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 8,280 basename.pm 04/07/99 11:42a 5,327 checktree.pm 04/07/99 11:42a 7,171 copy.pm 5 File(s) 20,778 bytes Directory of \perl\lib\getopt 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 31,629 long.pm 04/07/99 11:42a 3,248 std.pm 4 File(s) 34,877 bytes Directory of \perl\lib\io 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 3,925 file.pm 04/07/99 11:42a 12,830 handle.pm 04/07/99 11:42a 1,673 seekable.pm 5 File(s) 18,428 bytes Directory of \perl\lib\math 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 10,836 bigint.pm 3 File(s) 10,836 bytes Directory of \perl\lib\text 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 4,378 soundex.pm 04/07/99 11:42a 1,914 tabs.pm 04/07/99 11:42a 1,985 wrap.pm 5 File(s) 8,277 bytes Directory of \perl\lib\tie 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 4,143 hash.pm 3 File(s) 4,143 bytes Directory of \perl\scripts 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 72 hello.pl 3 File(s) 72 bytes Directory of \perldocs 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 1,115 sendmail.html 3 File(s) 1,115 bytes Directory of \perlroot 04/07/99 03:39p . 04/07/99 03:39p .. 04/07/99 11:42a 3,064 presendmail.pl 04/07/99 11:42a 3,485 sendmail.pl 04/07/99 12:30p 2,334 sendmail_static.pl 5 File(s) 8,883 bytes Total Files Listed: 94 File(s) 299,765 bytes Self-Extracting File Name: sdmail1b.exe Files Included Size Date Time ..\ SDMAIL1B.TXT (This file) SDMAIL.EXE 159744 4-8-1999 3:10:28 am ----------------------------------------------------------------- Any trademarks referenced in this document are the property of their respective owners. Consult your product manuals for complete trademark information. -----------------------------------------------------------------