Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: mime::lite $msg->send erratic

by olivierp (Hermit)
on Feb 09, 2005 at 23:12 UTC ( #429545=note: print w/replies, xml ) Need Help??

in reply to mime::lite $msg->send erratic

Are you sure it's not a restriction ?
Your attachments may be under the gateway's limit taken piece by piece, but it may not be the case when you attach all of them.
Replace the server & domain parts below, and have a look.
#!/usr/bin/perl -w use strict; use Net::SMTP; use IO::Scalar; my $smtp; my $debug = ''; tie *STDERR, 'IO::Scalar', \$debug; $smtp = Net::SMTP->new('your.smtp.server', Hello => '', Timeout => 30, Debug => 1, ); $smtp->quit(); untie *STDERR; print grep {/SIZE/} (split(/\n/,$debug));
Note: the STDERR redirection comes from this node, and if you look at MIME::Lite's docs, you'll notice MIME::Lite->send accepts a "sub" facility, where you could plug a variant of the snippet, to "enable" debugging. Take a look at send_by_smtp's source for further inspiration on how to do it.
Update: Actually, calling MIME::Lite->send_by_smtp with Debug => 1 as part of it's args may be simpler (haven't tried)

Replies are listed 'Best First'.
Re^2: mime::lite $msg->send erratic
by nnigam (Novice) on Feb 10, 2005 at 17:39 UTC
    Thanks for the tip. I did not have Scaler installed. I will install this as it seems very useful, but adding the debug option finally gave me the message that it is indeed the gateway limitation. Thanks

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://429545]
and !@monks...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (5)
As of 2017-11-20 04:09 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (284 votes). Check out past polls.