Can't locate objet method "new" via package "Mail::SendMail"

[karger]

Hi this is driving me nuts. I just installed perl. I went into the perl package and installed sendmail. Now when I try and run my test script i get: Can't locate object method "new" via package "Mail::SendMail" (perhaps you forgo t to load "Mail::SendMail"?) at C:\Temp\sendmail.pl line 14. Here is my code:

#!/usr/local/bin/perl
     use Mail::SendMail;

 $smtpserver         = "mail.karger.net";
    $smtpport         = 25;
    $sender             = 'Karger <[e-mail]>';
    $subject             = "OMG NO";
    $recipient         = '<[e-mail]>';
    $replyto             = $sender;
    $header             = "X-Mailer";
    $headervalue         = "Perl SendMail Module 1.09";
    
    
    $obj = new Mail::SendMail();
    $obj = new SendMail($smtpserver);
    $obj = new SendMail($smtpserver,    $smtpport);
    
    $obj->From($sender);
    $obj->Subject($subject);
    $obj->To($recipient);
    $obj->ReplyTo($replyto);
    $obj->setMailHeader($header, $headervalue);

    if ($obj->sendMail() != 0) {
     print $obj->{'error'}."\n";
       }

       $obj->reset();

HELP!

[Perlbotics]

$obj = new Mail::SendMail();

Primary problem: Mail::Sendmail does not provide an OO interface.

Secondary problem: Indirect object notation.
Prefer $obj = SomeClass->new(...) over $obj = new SomeClass(...).

Update: Maybe you meant Mail::Send? It has a similar interface...

Update2: ... ah, seems that poj solved it in Re^3: Can't locate objet method "new" via package "Mail::SendMail" -- sometimes we forget, that not everything is uploaded to/downloaded from CPAN!

[karger]

So i changed my use log line to say use Mail::Sendmail; I still seem to get the same error though on this line:

 $obj = new Mail::Sendmail();

[Corion]

YOu are on a case insensitive filesystem and misspelled Mail::SendMail. The module name is Mail::Sendmail with a lowercase m.

[chromatic]

$obj = new Mail::SendMail();
$obj = new SendMail($smtpserver);
$obj = new SendMail($smtpserver,    $smtpport);

Where did you get that example code? What do you expect it to do?

[hippo]

I went into the perl package and installed sendmail.

You'll have to explain what you mean by that, because it makes no sense to me.

    
    $obj = new Mail::SendMail();
    $obj = new SendMail($smtpserver);
    $obj = new SendMail($smtpserver,    $smtpport);

So, you overwrite $obj three times in three lines? I think it might be best if you were to explain a bit more what it is that you expect your script to do. You might think about using strict too.

[PerlSufi]

Hi there,
I just sent posted this example block of code on another node, but I ended up using MIME::Lite to send email through smtp. In this example I sent a tar file

 my $mail = MIME::Lite->new(
 From=> '[e-mail],
 To=> '[e-mail]',
 Subject=> "Hello email ",
 Type=>'multipart/mixed'
 );
 $mail->attach(
 Type => 'application/x-tar',
 Encoding => 'base64',
 Path => 'C:\path\to\file.tar',
 Filename => "file.tar"
 );
MIME::Lite->send('smtp','server.smtp.com',Debug=>0);
$mail->send;

I am aware that one of the first lines of documentation for this module the author discourages using MIME::Lite. I have also used MIME::Entity in its place. Hope this helps..

[karger]

thanks. Perhaps i need a proper exmaple of a send mail. Anyone?

[poj]

The code you posted looks like it is for a module called SendMail.pm. from here http://www.tneoh.zoneit.com/perl/SendMail/ whereas the module you have installed is Mail::Sendmail. You need to rewrite your code to be like the example in Mail::Sendmail .
poj