[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [MacPerl] A problem with mail



Thanks for your advice Paul, Thomas an Chris! Unfortunately it 
doesn't seem to work for me. I feel like a real dummy!

I downloaded "cpan-mac-0.50" from Chris's CPAN directory and 
"MailTools-1.15" from Graham Barr's directory. After removing the old 
"Mail" folder from "site_perl", putting "site_perl" first in my 
MacPerl search path, installing cpan-mac, and upping my Perl memory 
to 40 MB, I dropped "MailTools-1.15" on the the cpan-mac "installme" 
droplet. Every thing seemed to work perfectly. Lots of things were 
now in my "site_perl" folder, including a new "Mail" folder. I 
expected everything would work fine now.

Not so, unfortunately. Before these installations my script was able 
to get to its last "$mail->smtpsend or die" line. Now I can't get 
past line 4. MacPerl can't find the Mail::Internet module--which is 
sitting right there in "site_perl". I get a "Mail/Internet.pm did not 
return a true value" error.

Maybe I should just give up. Something is escaping me here. Perhaps I 
should read how to install stuff by hand and start all over.

Regards,

Vic

At 7:33 AM -0500 11/21/00, Paul Schinder wrote:
>At 6:59 AM -0500 11/21/00, Vic Norton wrote:
>>In any case my question remains the same. Why won't Barr's Mail
>>work? Have any of you MacPerl users been able to use smtpsend from
>>Mail::Internet?
>
>Yes.  But yours is not installed properly, and is very old to boot.
>Get the latest version of MailTools from CPAN.  Use Chris Nandor's
>cpan-mac <http://pudge.net/macperl> to install it.  The error
>messages indicate that you didn't install :lib:auto:Mail.  That kind
>of thing is dealt with automatically by cpan-mac.  One caution: you
>will need to increase MacPerl's memory partition to 30-40 MB to use
>cpan-mac.
>
>--
>Paul Schinder
>schinder@pobox.com

At 2:10 PM +0100 11/21/00, Thomas Wegner wrote:
>Hi Vic,
>
>your script isn't the problem. Your installation of the MailTools
>module isn't correct. Don't simply drop the Mail folder into your
>site_perl folder. Drop the zipped (or expanded) module/folder on
>Chris Nandor's installme.plx droplet (which comes with his cpan-mac
>module, available from
><http://www.perl.com/CPAN-local/authors/id/CNANDOR/> ). Internet.pm
>uses auto loaded methods (every sub after the magic __END__). During
>the installation process, the installer will take care that all of
>these auto loaded methods will be written as a xxx.al file to the
>:site_perl:auto:Mail:Internet: folder (notice the Autosplit lines in
>the MacPerl window during installation). In your installation, the
>file 'smtpsend.al' (the .al file for the smtpsend sub) is missing --
>and that's what the error message says.
>
>You may want to do the autosplitting by hand (but I don't recommend
>that). The following script will do the job (please specify full
>paths; see AutoSplit.pm for details):
>
>___________
>#! perl
>
>use AutoSplit;
>autosplit("IntHD:Languages:MacPerl Ÿ:site_perl:Mail:Internet.pm",
>	"IntHD:Languages:MacPerl Ÿ:site_perl:auto:", 0, 1, 0);
>
>___________
>
>And that's the expected output:
>
>AutoSplitting Mail::Internet (IntHD:Languages:MacPerl
>Ÿ:site_perl:Mail:Internet.pm =>
>IntHD:Languages:MacPerl Ÿ:site_perl:auto:Mail:Internet)
>   writing IntHD:Languages:MacPerl Ÿ:site_perl:auto:Mail:Internet:reply.al
>   writing IntHD:Languages:MacPerl
>Ÿ:site_perl:auto:Mail:Internet:add_signature.al
>   writing IntHD:Languages:MacPerl Ÿ:site_perl:auto:Mail:Internet:sign.al
>   writing IntHD:Languages:MacPerl Ÿ:site_perl:auto:Mail:Internet:_prephdr.al
>   writing IntHD:Languages:MacPerl Ÿ:site_perl:auto:Mail:Internet:smtpsend.al
>   writing IntHD:Languages:MacPerl Ÿ:site_perl:auto:Mail:Internet:nntppost.al
>   writing IntHD:Languages:MacPerl 
>Ÿ:site_perl:auto:Mail:Internet:escape_from.al
>   writing IntHD:Languages:MacPerl
>Ÿ:site_perl:auto:Mail:Internet:unescape_from.al
>
>
>Now, your script should work.
>
>Hope that helps.
>
>Best regards,
>--Thomas

At 2:19 PM -0500 11/21/00, Chris Nandor wrote:
>Note that the MacPerl book (the companion to the CD-ROM :) has complete
>directions for installing the modules the old way, including how to do the
>AutoSplit part.
>
>--
>Chris Nandor                      pudge@pobox.com    http://pudge.net/
>Open Source Development Network    pudge@osdn.com     http://osdn.com/

---Latest error report -------------------------------------------

# Mail/Internet.pm did not return a true value.
File 'ExtHD.doc:Scripts, etc:Perl:My Perl Scripts:Email Ÿ:simple 
email examples:newmail0.pl'; Line 4

---The original script -------------------------------------------

#!perl
use strict;

use Mail::Internet; # now I can't get  past here
use Mail::Header;
$ENV{SMTPHOSTS} = 'mail.dacor.net';

my ($header, $body, $mail);

# create headers
$header = new Mail::Header;
$header->add('To', 'Vic Norton <norton@bgnet.bgsu.edu>');
$header->add('From', 'Vic Norton <norton@tweney.com>');
$header->add('Subject', 'Mail::Test');
$header->add(undef, 'X-Norton-URL: <http://www.tweney.com/norton/>');

# create body
$body = 'This is a test, ignore';

# create mail object
$mail = new Mail::Internet(undef, Header => $header, Body => \[$body]);

# send it
$mail->smtpsend or die; # this is where my problem used to be

# ===== Want to unsubscribe from this list?
# ===== Send mail with body "unsubscribe" to macperl-request@macperl.org