• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 302
  • Last Modified:

I will pay cash for a script that......

I am doing a fairly complex website for someone at the moment, and i am getting paid for it, so i thought i had better do a good job :)

I am willing to pay someone to come up with a script that i can use in any script of mine, and which i have total ownership of once it is paid for.

I want to be able to send emails from within perl scripts...but I do not have a sendmail program. I am running a Windows NT server, but my isp doesnt have a mail program installed on this, so a program will have to be included to actually send the mail once the data is ready to go...prefferably an OO ADT, but something like:

mail.reciever = "$email_address";
mail.subject = "$subject";
mail.sender = "$sender";
mail.message = "$Hello there $name, how the hell are you??";
mail.send;

OR even a function that accepts all the above as a parameter....

maildata{'reciver'} = $reciever;
maildata{'sender'} = $sender;
maildata{'subject'} = $subject;
maildata{'message'} = $message;

sendmail(%maildata);

i dont care how it works, but i would like it to work on NT and Unix.

is anyone up to it?

if not, where can i get one???
0
activegs
Asked:
activegs
  • 5
  • 3
1 Solution
 
b2piCommented:
Hmmm, I assume you have an SMTP Server?

perldoc Net::SMTP
<snip>
This example sends a small message to the postmaster at the
SMTP server known as mailhost
 
use Net::SMTP;
 
$smtp = Net::SMTP->new('mailhost');
 
$smtp->mail($ENV{USER});
$smtp->to('postmaster');
 
$smtp->data();
$smtp->datasend("To: postmaster\n");
$smtp->datasend("\n");
$smtp->datasend("A simple test message\n");
$smtp->dataend();
 
$smtp->quit;


<snip>

You can get a lot fancier than that, see the docs on Net::SMTP
0
 
activegsAuthor Commented:
Where can i get a copy of that library, and also, what if i am not the post master, can i subsitute my email address there??





0
 
b2piCommented:
www.perl.com is where you can get all perl modules

Yes, you can substitute _anyone's_ address there.
0
Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
activegsAuthor Commented:
I go to perl.com and search for this module, but i get this document, I cannot find a binary file anywhere.

http://reference.perl.com/wrap.cgi?net-smtp

0
 
b2piCommented:
That's funny.  When I go to www.perl.com and search for smtp, I see
immediately that Net::SMTP is part of the libnet bundle, which is at
www.perl.com/CPAN-local/modules/by-module/Net/libnet-1.0605.tar.gz.
However, it's also included already in the binary distributions.  You
may not need to actually donwload it (to find out, just type in perl
at a command line, and then type in

use Net::SMTP;

If you don't get error messages there, you don't need to download it.
0
 
activegsAuthor Commented:
i type in a perl script

use Net:SMTP;

i get...cannot find Net/SMTP.pm in @inc...

I cannot find this perl module anywhere can you email a copy of it at John@ActiveGS.com.au ??

ta, John
0
 
activegsAuthor Commented:
I am running nt remeber, and I could not download the file you typed above for some unkown reason....(IE says my security settings a wrong - i can't ftp it!!)
0
 
activegsAuthor Commented:
Actually could you email me all the pm in the library??
these are:
Net::FTP       RFC959            File Transfer Protocol
Net::SMTP      RFC821            Simple Mail Transfer Protocol
Net::Time      RFC867            Daytime ProtocolNet::Time      RFC868            Time Protocol
Net::NNTP      RFC977            Network News Transfer Protocol
Net::POP3      RFC1939            Post Office Protocol 3
Net::SNPP      RFC1861            Simple Network Pager Protocol

thanks,note the increase in points....
John
John@ActiveGS.com.au
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

  • 5
  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now